Runge-Kutta method: Difference between revisions
Content deleted Content added
→{{header|Perl 6}}: added translation to perl5 |
|||
Line 457:
<lang perl>sub runge_kutta {
my ($yp, $t, $y, $dt) = @_;
my $
sub {
return $y unless $
my @dy;
push @dy, $dt * $yp->( $t , $y );
| |||