| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_osc_mul_r.F |
25 |
GAD_OSC_MUL_R |
_RL oval,omin,omax |
|
./pkg/generic_advdiff/gad_osc_mul_r.F |
30 |
GAD_OSC_MUL_R |
omin = +1. _d 99 |
|
./pkg/generic_advdiff/gad_osc_mul_r.F |
50 |
GAD_OSC_MUL_R |
if (oval.lt.omin) omin = oval |
|
./pkg/generic_advdiff/gad_osc_mul_r.F |
64 |
GAD_OSC_MUL_R |
& / (omin + zero)**3 |
|
./pkg/generic_advdiff/gad_osc_mul_x.F |
25 |
GAD_OSC_MUL_X |
_RL oval,omin,omax |
|
./pkg/generic_advdiff/gad_osc_mul_x.F |
30 |
GAD_OSC_MUL_X |
omin = +1. _d 99 |
|
./pkg/generic_advdiff/gad_osc_mul_x.F |
50 |
GAD_OSC_MUL_X |
if (oval.lt.omin) omin = oval |
|
./pkg/generic_advdiff/gad_osc_mul_x.F |
64 |
GAD_OSC_MUL_X |
& / (omin + zero)**3 |
|
./pkg/generic_advdiff/gad_osc_mul_y.F |
25 |
GAD_OSC_MUL_Y |
_RL oval,omin,omax |
|
./pkg/generic_advdiff/gad_osc_mul_y.F |
30 |
GAD_OSC_MUL_Y |
omin = +1. _d 99 |
|
./pkg/generic_advdiff/gad_osc_mul_y.F |
50 |
GAD_OSC_MUL_Y |
if (oval.lt.omin) omin = oval |
|
./pkg/generic_advdiff/gad_osc_mul_y.F |
64 |
GAD_OSC_MUL_Y |
& / (omin + zero)**3 |