Select Code to Download

# BAD
sub outer {
...
   my $dydt = sub { ... };
   ($t, @y) = rkXXX(\@y, $dydt, $t, $dt);
}