File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/gad_osc_mul_r.F |
24 |
GAD_OSC_MUL_R |
_RL osum,zero,mval |
./pkg/generic_advdiff/gad_osc_mul_r.F |
66 |
GAD_OSC_MUL_R |
osum = scal(1) + scal(2) |
./pkg/generic_advdiff/gad_osc_mul_r.F |
67 |
GAD_OSC_MUL_R |
scal(1) = scal(1) / osum |
./pkg/generic_advdiff/gad_osc_mul_r.F |
68 |
GAD_OSC_MUL_R |
scal(2) = scal(2) / osum |
./pkg/generic_advdiff/gad_osc_mul_x.F |
24 |
GAD_OSC_MUL_X |
_RL osum,zero,mval |
./pkg/generic_advdiff/gad_osc_mul_x.F |
66 |
GAD_OSC_MUL_X |
osum = scal(1) + scal(2) |
./pkg/generic_advdiff/gad_osc_mul_x.F |
67 |
GAD_OSC_MUL_X |
scal(1) = scal(1) / osum |
./pkg/generic_advdiff/gad_osc_mul_x.F |
68 |
GAD_OSC_MUL_X |
scal(2) = scal(2) / osum |
./pkg/generic_advdiff/gad_osc_mul_y.F |
24 |
GAD_OSC_MUL_Y |
_RL osum,zero,mval |
./pkg/generic_advdiff/gad_osc_mul_y.F |
66 |
GAD_OSC_MUL_Y |
osum = scal(1) + scal(2) |
./pkg/generic_advdiff/gad_osc_mul_y.F |
67 |
GAD_OSC_MUL_Y |
scal(1) = scal(1) / osum |
./pkg/generic_advdiff/gad_osc_mul_y.F |
68 |
GAD_OSC_MUL_Y |
scal(2) = scal(2) / osum |