@@ -9,7 +9,7 @@ function verlet(pos::Float64, acc::Float64, dt::Float64)
99 prev_pos = temp_pos
1010 end
1111
12- println ( time)
12+ return time
1313end
1414
1515function stormer_verlet (pos:: Float64 , acc:: Float64 , dt:: Float64 )
@@ -27,7 +27,7 @@ function stormer_verlet(pos::Float64, acc::Float64, dt::Float64)
2727 vel += acc* dt
2828 end
2929
30- println ( time)
30+ return time, vel
3131end
3232
3333function velocity_verlet (pos:: Float64 , acc:: Float64 , dt:: Float64 )
@@ -41,13 +41,20 @@ function velocity_verlet(pos::Float64, acc::Float64, dt::Float64)
4141 vel += acc * dt;
4242 end
4343
44- println ( time)
44+ return time, vel
4545end
4646
4747function 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 " )
5158end
5259
5360main ()
0 commit comments