| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
15 |
GAD_SOM_ADV_R |
U alp, aln, fp_v, fn_v, fp_o, fn_o, |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
163 |
GAD_SOM_ADV_R |
aln (i,j,kUp) = fn_v(i,j,kUp)/sm_v(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
164 |
GAD_SOM_ADV_R |
alnq = aln(i,j,kUp)*aln(i,j,kUp) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
165 |
GAD_SOM_ADV_R |
aln1 = 1. _d 0 - aln(i,j,kUp) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
168 |
GAD_SOM_ADV_R |
fn_o (i,j,kUp) = aln(i,j,kUp)*sm_o(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
171 |
GAD_SOM_ADV_R |
fn_x (i,j,kUp) = aln(i,j,kUp)*sm_x(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
172 |
GAD_SOM_ADV_R |
fn_y (i,j,kUp) = aln(i,j,kUp)*sm_y(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
175 |
GAD_SOM_ADV_R |
fn_xx(i,j,kUp) = aln(i,j,kUp)*sm_xx(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
176 |
GAD_SOM_ADV_R |
fn_yy(i,j,kUp) = aln(i,j,kUp)*sm_yy(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
177 |
GAD_SOM_ADV_R |
fn_xy(i,j,kUp) = aln(i,j,kUp)*sm_xy(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
190 |
GAD_SOM_ADV_R |
aln (i,j,kUp) = fn_v(i,j,kUp)/sm_v(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
191 |
GAD_SOM_ADV_R |
alnq = aln(i,j,kUp)*aln(i,j,kUp) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
192 |
GAD_SOM_ADV_R |
aln1 = 1. _d 0 - aln(i,j,kUp) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
195 |
GAD_SOM_ADV_R |
fn_o (i,j,kUp) = aln(i,j,kUp)* |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
197 |
GAD_SOM_ADV_R |
& + aln1*(aln1-aln(i,j,kUp))*sm_zz(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
201 |
GAD_SOM_ADV_R |
fn_zz(i,j,kUp) = aln(i,j,kUp)*alnq*sm_zz(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
202 |
GAD_SOM_ADV_R |
fn_x (i,j,kUp) = aln(i,j,kUp)* |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
204 |
GAD_SOM_ADV_R |
fn_y (i,j,kUp) = aln(i,j,kUp)* |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
208 |
GAD_SOM_ADV_R |
fn_xx(i,j,kUp) = aln(i,j,kUp)*sm_xx(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
209 |
GAD_SOM_ADV_R |
fn_yy(i,j,kUp) = aln(i,j,kUp)*sm_yy(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
210 |
GAD_SOM_ADV_R |
fn_xy(i,j,kUp) = aln(i,j,kUp)*sm_xy(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
231 |
GAD_SOM_ADV_R |
aln (i,j,kUp) = fn_v(i,j,kUp)/sm_v(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
234 |
GAD_SOM_ADV_R |
fn_o (i,j,kUp) = aln(i,j,kUp)*sm_o(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
235 |
GAD_SOM_ADV_R |
fn_x (i,j,kUp) = aln(i,j,kUp)*sm_x(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
236 |
GAD_SOM_ADV_R |
fn_y (i,j,kUp) = aln(i,j,kUp)*sm_y(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
237 |
GAD_SOM_ADV_R |
fn_xx(i,j,kUp) = aln(i,j,kUp)*sm_xx(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
238 |
GAD_SOM_ADV_R |
fn_yy(i,j,kUp) = aln(i,j,kUp)*sm_yy(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
239 |
GAD_SOM_ADV_R |
fn_xy(i,j,kUp) = aln(i,j,kUp)*sm_xy(i,j,km1) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
252 |
GAD_SOM_ADV_R |
alf1 = 1. _d 0 - aln(i,j,kDw) - alp(i,j,kUp) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
254 |
GAD_SOM_ADV_R |
alpmn = alp(i,j,kUp) - aln(i,j,kDw) |
|
./pkg/generic_advdiff/gad_som_adv_r.F |
80 |
GAD_SOM_ADV_R |
_RL aln (1-OLx:sNx+OLx,1-OLy:sNy+OLy,2) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
205 |
GAD_SOM_ADV_X |
aln (i,j) = fn_v(i,j)/sm_v( i ,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
206 |
GAD_SOM_ADV_X |
alnq = aln(i,j)*aln(i,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
207 |
GAD_SOM_ADV_X |
aln1 = 1. _d 0 - aln(i,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
210 |
GAD_SOM_ADV_X |
fn_o (i,j) = aln(i,j)*( sm_o( i ,j) - aln1*sm_x( i ,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
211 |
GAD_SOM_ADV_X |
& + aln1*(aln1-aln(i,j))*sm_xx( i ,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
214 |
GAD_SOM_ADV_X |
fn_xx(i,j) = aln(i,j)*alnq*sm_xx( i ,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
215 |
GAD_SOM_ADV_X |
fn_y (i,j) = aln(i,j)*( sm_y( i ,j) - aln1*sm_xy( i ,j) ) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
216 |
GAD_SOM_ADV_X |
fn_z (i,j) = aln(i,j)*( sm_z( i ,j) - aln1*sm_xz( i ,j) ) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
219 |
GAD_SOM_ADV_X |
fn_yy(i,j) = aln(i,j)*sm_yy( i ,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
220 |
GAD_SOM_ADV_X |
fn_zz(i,j) = aln(i,j)*sm_zz( i ,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
221 |
GAD_SOM_ADV_X |
fn_yz(i,j) = aln(i,j)*sm_yz( i ,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
246 |
GAD_SOM_ADV_X |
alf1 = 1. _d 0 - aln(i,j) - alp(i+1,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
248 |
GAD_SOM_ADV_X |
alpmn = alp(i+1,j) - aln(i,j) |
|
./pkg/generic_advdiff/gad_som_adv_x.F |
96 |
GAD_SOM_ADV_X |
_RL aln (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
206 |
GAD_SOM_ADV_Y |
aln (i,j) = fn_v(i,j)/sm_v(i, j ) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
207 |
GAD_SOM_ADV_Y |
alnq = aln(i,j)*aln(i,j) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
208 |
GAD_SOM_ADV_Y |
aln1 = 1. _d 0 - aln(i,j) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
211 |
GAD_SOM_ADV_Y |
fn_o (i,j) = aln(i,j)*( sm_o(i, j ) - aln1*sm_y(i, j ) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
212 |
GAD_SOM_ADV_Y |
& + aln1*(aln1-aln(i,j))*sm_yy(i, j ) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
215 |
GAD_SOM_ADV_Y |
fn_yy(i,j) = aln(i,j)*alnq*sm_yy(i, j ) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
216 |
GAD_SOM_ADV_Y |
fn_x (i,j) = aln(i,j)*( sm_x(i, j ) - aln1*sm_xy(i, j ) ) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
217 |
GAD_SOM_ADV_Y |
fn_z (i,j) = aln(i,j)*( sm_z(i, j ) - aln1*sm_yz(i, j ) ) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
220 |
GAD_SOM_ADV_Y |
fn_xx(i,j) = aln(i,j)*sm_xx(i, j ) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
221 |
GAD_SOM_ADV_Y |
fn_zz(i,j) = aln(i,j)*sm_zz(i, j ) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
222 |
GAD_SOM_ADV_Y |
fn_xz(i,j) = aln(i,j)*sm_xz(i, j ) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
247 |
GAD_SOM_ADV_Y |
alf1 = 1. _d 0 - aln(i,j) - alp(i,j+1) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
249 |
GAD_SOM_ADV_Y |
alpmn = alp(i,j+1) - aln(i,j) |
|
./pkg/generic_advdiff/gad_som_adv_y.F |
96 |
GAD_SOM_ADV_Y |
_RL aln (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_som_advect.F |
113 |
GAD_SOM_ADVECT |
_RL aln (1-OLx:sNx+OLx,1-OLy:sNy+OLy,2) |
|
./pkg/generic_advdiff/gad_som_advect.F |
509 |
GAD_SOM_ADVECT |
aln (i,j,kDown) = 0. _d 0 |
|
./pkg/generic_advdiff/gad_som_advect.F |
607 |
GAD_SOM_ADVECT |
U alp, aln, fp_v, fn_v, fp_o, fn_o, |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
129 |
BULKF_FORMULA_LANL |
aln = log(ht/zref) |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
181 |
BULKF_FORMULA_LANL |
rd = rdn/(1. _d 0 + rdn*(aln-psimh)/xkar) |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
182 |
BULKF_FORMULA_LANL |
rh = rhn/(1. _d 0 + rhn*(aln-psixh)/xkar) |
|
./pkg/bulk_force/bulkf_formula_lanl.F |
97 |
BULKF_FORMULA_LANL |
_RL aln ! = log(ht/zref) |
|
./pkg/cheapaml/cheapaml.F |
127 |
CHEAPAML |
aln = log(ht/zref) |
|
./pkg/cheapaml/cheapaml.F |
321 |
CHEAPAML |
rd = rdn/(1. _d 0 + rdn*(aln-psimh)/xkar) |
|
./pkg/cheapaml/cheapaml.F |
322 |
CHEAPAML |
rh = rhn/(1. _d 0 + rhn*(aln-psixh)/xkar) |
|
./pkg/cheapaml/cheapaml.F |
93 |
CHEAPAML |
_RL aln,cdalton,czol,psim_fac |