@@ -333,14 +333,14 @@ fdif!(du,u0,p,t)
333
333
sys2 = stochastic_integral_transform (sys,- 1 // 2 )
334
334
fdrift = eval (generate_function (sys2)[1 ])
335
335
fdif = eval (generate_diffusion_function (sys2)[1 ])
336
- @test fdrift (u0,p,t) == [p[1 ]* u0[1 ] - 1 // 2 * (p[2 ]^ 2 * u0[1 ]+ p[3 ]^ 2 * u0[1 ]), p[1 ]* u0[2 ] - 1 // 2 * (p[2 ]* p[4 ]* u0[1 ]+ p[5 ]^ 2 * u0[2 ])]
336
+ @test fdrift (u0,p,t) ≈ [p[1 ]* u0[1 ] - 1 // 2 * (p[2 ]^ 2 * u0[1 ]+ p[3 ]^ 2 * u0[1 ]), p[1 ]* u0[2 ] - 1 // 2 * (p[2 ]* p[4 ]* u0[1 ]+ p[5 ]^ 2 * u0[2 ])]
337
337
@test fdif (u0,p,t) == [p[2 ]* u0[1 ] p[3 ]* u0[1 ]
338
338
p[4 ]* u0[1 ] p[5 ]* u0[2 ] ]
339
339
fdrift! = eval (generate_function (sys2)[2 ])
340
340
fdif! = eval (generate_diffusion_function (sys2)[2 ])
341
341
du = similar (u0)
342
342
fdrift! (du,u0,p,t)
343
- @test du == [p[1 ]* u0[1 ] - 1 // 2 * (p[2 ]^ 2 * u0[1 ]+ p[3 ]^ 2 * u0[1 ]), p[1 ]* u0[2 ] - 1 // 2 * (p[2 ]* p[4 ]* u0[1 ]+ p[5 ]^ 2 * u0[2 ])]
343
+ @test du ≈ [p[1 ]* u0[1 ] - 1 // 2 * (p[2 ]^ 2 * u0[1 ]+ p[3 ]^ 2 * u0[1 ]), p[1 ]* u0[2 ] - 1 // 2 * (p[2 ]* p[4 ]* u0[1 ]+ p[5 ]^ 2 * u0[2 ])]
344
344
du = similar (u0, size (prob. noise_rate_prototype))
345
345
fdif! (du,u0,p,t)
346
346
@test du == [p[2 ]* u0[1 ] p[3 ]* u0[1 ]
@@ -350,14 +350,14 @@ fdif!(du,u0,p,t)
350
350
sys2 = stochastic_integral_transform (sys,1 // 2 )
351
351
fdrift = eval (generate_function (sys2)[1 ])
352
352
fdif = eval (generate_diffusion_function (sys2)[1 ])
353
- @test fdrift (u0,p,t) == [p[1 ]* u0[1 ] + 1 // 2 * (p[2 ]^ 2 * u0[1 ]+ p[3 ]^ 2 * u0[1 ]), p[1 ]* u0[2 ] + 1 // 2 * (p[2 ]* p[4 ]* u0[1 ]+ p[5 ]^ 2 * u0[2 ])]
353
+ @test fdrift (u0,p,t) ≈ [p[1 ]* u0[1 ] + 1 // 2 * (p[2 ]^ 2 * u0[1 ]+ p[3 ]^ 2 * u0[1 ]), p[1 ]* u0[2 ] + 1 // 2 * (p[2 ]* p[4 ]* u0[1 ]+ p[5 ]^ 2 * u0[2 ])]
354
354
@test fdif (u0,p,t) == [p[2 ]* u0[1 ] p[3 ]* u0[1 ]
355
355
p[4 ]* u0[1 ] p[5 ]* u0[2 ] ]
356
356
fdrift! = eval (generate_function (sys2)[2 ])
357
357
fdif! = eval (generate_diffusion_function (sys2)[2 ])
358
358
du = similar (u0)
359
359
fdrift! (du,u0,p,t)
360
- @test du == [p[1 ]* u0[1 ] + 1 // 2 * (p[2 ]^ 2 * u0[1 ]+ p[3 ]^ 2 * u0[1 ]), p[1 ]* u0[2 ] + 1 // 2 * (p[2 ]* p[4 ]* u0[1 ]+ p[5 ]^ 2 * u0[2 ])]
360
+ @test du ≈ [p[1 ]* u0[1 ] + 1 // 2 * (p[2 ]^ 2 * u0[1 ]+ p[3 ]^ 2 * u0[1 ]), p[1 ]* u0[2 ] + 1 // 2 * (p[2 ]* p[4 ]* u0[1 ]+ p[5 ]^ 2 * u0[2 ])]
361
361
du = similar (u0, size (prob. noise_rate_prototype))
362
362
fdif! (du,u0,p,t)
363
363
@test du == [p[2 ]* u0[1 ] p[3 ]* u0[1 ]
0 commit comments