File |
Line number |
Procedure |
Code |
./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 |
163 |
GAD_SOM_ADV_X |
s2new = MIN( (slpmax+slpmax-ABS(s1new)/three), |
./pkg/generic_advdiff/gad_som_adv_x.F |
164 |
GAD_SOM_ADV_X |
& MAX(ABS(s1new)-slpmax,sm_xx(i,j)) ) |
./pkg/generic_advdiff/gad_som_adv_x.F |
167 |
GAD_SOM_ADV_X |
sm_x (i,j) = s1new |
./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 |
162 |
GAD_SOM_ADV_Y |
s1new = MIN( s1max, MAX(-s1max,sm_y(i,j)) ) |
./pkg/generic_advdiff/gad_som_adv_y.F |
163 |
GAD_SOM_ADV_Y |
s2new = MIN( (slpmax+slpmax-ABS(s1new)/three), |
./pkg/generic_advdiff/gad_som_adv_y.F |
164 |
GAD_SOM_ADV_Y |
& MAX(ABS(s1new)-slpmax,sm_yy(i,j)) ) |
./pkg/generic_advdiff/gad_som_adv_y.F |
167 |
GAD_SOM_ADV_Y |
sm_y (i,j) = s1new |
./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 |
72 |
GAD_SOM_LIM_R |
s1new = MIN( s1max, MAX(-s1max,sm_z(i,j,k)) ) |
./pkg/generic_advdiff/gad_som_lim_r.F |
73 |
GAD_SOM_LIM_R |
s2new = MIN( (slpmax+slpmax-ABS(s1new)/three), |
./pkg/generic_advdiff/gad_som_lim_r.F |
74 |
GAD_SOM_LIM_R |
& MAX(ABS(s1new)-slpmax,sm_zz(i,j,k)) ) |
./pkg/generic_advdiff/gad_som_lim_r.F |
77 |
GAD_SOM_LIM_R |
sm_z (i,j,k) = s1new |