@@ -9,7 +9,7 @@ function verlet(pos::Float64, acc::Float64, dt::Float64)
9
9
prev_pos = temp_pos
10
10
end
11
11
12
- println ( time)
12
+ return time
13
13
end
14
14
15
15
function stormer_verlet (pos:: Float64 , acc:: Float64 , dt:: Float64 )
@@ -27,7 +27,7 @@ function stormer_verlet(pos::Float64, acc::Float64, dt::Float64)
27
27
vel += acc* dt
28
28
end
29
29
30
- println ( time)
30
+ return time, vel
31
31
end
32
32
33
33
function velocity_verlet (pos:: Float64 , acc:: Float64 , dt:: Float64 )
@@ -41,13 +41,20 @@ function velocity_verlet(pos::Float64, acc::Float64, dt::Float64)
41
41
vel += acc * dt;
42
42
end
43
43
44
- println ( time)
44
+ return time, vel
45
45
end
46
46
47
47
function main ()
48
- verlet (5.0 , - 10.0 , 0.01 );
49
- stormer_verlet (5.0 , - 10.0 , 0.01 );
50
- velocity_verlet (5.0 , - 10.0 , 0.01 );
48
+ time = verlet (5.0 , - 10.0 , 0.01 );
49
+ println (" Time for Verlet integration is: $(time) \n " )
50
+
51
+ time, vel = stormer_verlet (5.0 , - 10.0 , 0.01 );
52
+ println (" Time for Stormer Verlet integration is: $(time) " )
53
+ println (" Velocity for Stormer Verlet integration is: $(vel) \n " )
54
+
55
+ time, vel = velocity_verlet (5.0 , - 10.0 , 0.01 );
56
+ println (" Time for velocity Verlet integration is: $(time) " )
57
+ println (" Velocity for velocity Verlet integration is: $(vel) \n " )
51
58
end
52
59
53
60
main ()
0 commit comments