File: test_sundials.py

package info (click to toggle)
dolfin 2019.2.0~legacy20240219.1c52e83-18
  • links: PTS, VCS
  • area: main
  • in suites: trixie
  • size: 31,700 kB
  • sloc: xml: 104,040; cpp: 102,227; python: 24,356; sh: 460; makefile: 330; javascript: 226
file content (99 lines) | stat: -rw-r--r-- 2,332 bytes parent folder | download | duplicates (6)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
#!/usr/bin/python3

import numpy
from dolfin import *
from dolfin_utils.test import skip_if_not_SUNDIALS


@skip_if_not_SUNDIALS
def test_sundials_adams():

    class MyCVode(CVode):

        def derivs(self, t, u, udot):
            udot[:] = -u[:]

        def jacobian(self, v, Jv, t, y, fy):
            Jv[:] = v[:]
            return 0

        def psolve(self, t, u, udot, r, z, gamma, x, y):
            z[:] = r[:]
            return 0

    phi = Vector(MPI.comm_world, 10)
    phi[:] = 1.0

    cv = MyCVode(CVode.LMM.CV_ADAMS, CVode.ITER.CV_FUNCTIONAL)
    cv.init(phi, 1e-7, 1e-7)

    nstep = 200
    dt = 0.01
    for i in range(nstep):
        t = cv.step(dt)
        assert (exp(-t) - phi[0]) < 1e-6

@skip_if_not_SUNDIALS
def test_sundials_newton():

    class MyCVode(CVode):

        def derivs(self, t, u, udot):
            udot[:] = -u[:]

        def jacobian(self, v, Jv, t, y, fy):
            Jv[:] = v[:]
            return 0

        def psolve(self, t, u, udot, r, z, gamma, x, y):
            z[:] = r[:]
            return 0

    phi = Vector(MPI.comm_world, 10)
    phi[:] = 1.0

    cv = MyCVode(CVode.LMM.CV_BDF, CVode.ITER.CV_NEWTON)
    cv.init(phi, 1e-7, 1e-7)

    nstep = 200
    dt = 0.01
    for i in range(nstep):
        t = cv.step(dt)
        assert (exp(-t) - phi[0]) < 1e-6

@skip_if_not_SUNDIALS
def test_sundials_diffusion_1d():
    # Finite difference test
    mesh = UnitIntervalMesh(MPI.comm_world, 100)
    Q = FunctionSpace(mesh, "CG", 1)
    F = Function(Q)
    b = 2.0
    F.interpolate(Expression("exp(-b*pow(x[0] - 0.5, 2))", b=b, degree=1))
    phi = F.vector()

    class tmp_test(CVode):
        def derivs(self, t, phi, phidot):
            p = phi[:]
            pd = numpy.zeros_like(p)
            for i in range(1, len(p)-1):
                pd[i] = p[i-1] - 2*p[i] + p[i+1]
            phidot[:] = pd

        def jacobian(self, v, Jv, t, y, fy):
            Jv[:] = v[:]
            return 0
        def psolve(self, t, u, udot, r, z, gamma, x, y):
            z[:] = r[:]
            return 0

    cv = tmp_test(CVode.LMM.CV_BDF, CVode.ITER.CV_NEWTON)
    cv.init(phi, 1e-7, 1e-7)

    t0 = 1.0/(4.0*b)
    cv.set_time(t0)

    nstep = 200
    dt = 0.25
    for i in range(nstep):
        t = cv.step(dt)
        print(t, phi.max(), phi.sum(), sqrt(t)*phi.max())