File |
Line number |
Procedure |
Code |
./pkg/generic_advdiff/gad_som_adv_x.F |
161 |
GAD_SOM_ADV_X |
s1max = slpmax*1.5 _d 0 |
./pkg/generic_advdiff/gad_som_adv_x.F |
162 |
GAD_SOM_ADV_X |
s1new = MIN( s1max, MAX(-s1max,sm_x(i,j)) ) |
./pkg/generic_advdiff/gad_som_adv_x.F |
93 |
GAD_SOM_ADV_X |
_RL slpmax, s1max, s1new, s2new |
./pkg/generic_advdiff/gad_som_adv_y.F |
161 |
GAD_SOM_ADV_Y |
s1max = slpmax*1.5 _d 0 |
./pkg/generic_advdiff/gad_som_adv_y.F |
162 |
GAD_SOM_ADV_Y |
s1new = MIN( s1max, MAX(-s1max,sm_y(i,j)) ) |
./pkg/generic_advdiff/gad_som_adv_y.F |
93 |
GAD_SOM_ADV_Y |
_RL slpmax, s1max, s1new, s2new |
./pkg/generic_advdiff/gad_som_lim_r.F |
60 |
GAD_SOM_LIM_R |
_RL slpmax, s1max, s1new, s2new |
./pkg/generic_advdiff/gad_som_lim_r.F |
71 |
GAD_SOM_LIM_R |
s1max = slpmax*1.5 _d 0 |
./pkg/generic_advdiff/gad_som_lim_r.F |
72 |
GAD_SOM_LIM_R |
s1new = MIN( s1max, MAX(-s1max,sm_z(i,j,k)) ) |