sub _equation_air {
        my ( $args_ref, $level_iii_ref, $y ) = @_;
#    my $_equation_air = sub {
#        my $y = shift;
#    local *_equation_air = sub {
#        my $y = shift;
...