File tree Expand file tree Collapse file tree 1 file changed +6
-6
lines changed Expand file tree Collapse file tree 1 file changed +6
-6
lines changed Original file line number Diff line number Diff line change 76
76
k,α = p
77
77
A,B,C,D = u
78
78
n = 2 * α^ 2
79
- rl = t * k / factorial (Int64 (n) ) * A^ n
80
- rl2 = A^ α * B^ 2 / (2 * factorial (Int64 (α) ))
79
+ rl = t * k / factorial (n ) * A^ n
80
+ rl2 = A^ α * B^ 2 / (2 * factorial (α ))
81
81
82
82
du = zeros (4 )
83
83
du[1 ] = - n * rl - α * rl2
112
112
function sdenoise (u, p, t)
113
113
k,α = p
114
114
A,B,C,D = u
115
- n = Int64 ( 2 * α^ 2 )
116
- rl = sqrt (t * k / factorial (Int64 (n) ) * A^ n)
117
- rl2 = sqrt (A^ α * B^ 2 / (2 * factorial (Int64 (α) )))
115
+ n = 2 * α^ 2
116
+ rl = sqrt (t * k / factorial (n ) * A^ n)
117
+ rl2 = sqrt (A^ α * B^ 2 / (2 * factorial (α )))
118
118
119
119
du = zeros (4 ,2 )
120
120
du = [- n* rl (- α* rl2);
149
149
function r1 (u, p, t)
150
150
k, α = p
151
151
A = u[1 ]
152
- t * k * binomial (Int64 (A), Int64 ( 2 * α^ 2 ) )
152
+ t * k * binomial (A, 2 * α^ 2 )
153
153
end
154
154
function affect1! (integrator)
155
155
k, α = integrator. p
You can’t perform that action at this time.
0 commit comments