| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_c4_adv_r.F |
56 |
GAD_C4_ADV_R |
INTEGER i,j,kp1,km1,km2 |
|
./pkg/generic_advdiff/gad_c4_adv_r.F |
61 |
GAD_C4_ADV_R |
km2=MAX(1,k-2) |
|
./pkg/generic_advdiff/gad_c4_adv_r.F |
76 |
GAD_C4_ADV_R |
maskBound = maskPM*maskC(i,j,km2,bi,bj)*maskC(i,j,kp1,bi,bj) |
|
./pkg/generic_advdiff/gad_c4_adv_r.F |
80 |
GAD_C4_ADV_R |
Rjm=(tracer(i,j,km1,bi,bj)-tracer(i,j,km2,bi,bj)) |
|
./pkg/generic_advdiff/gad_dst3_adv_r.F |
57 |
GAD_DST3_ADV_R |
INTEGER i,j,kp1,km1,km2 |
|
./pkg/generic_advdiff/gad_dst3_adv_r.F |
71 |
GAD_DST3_ADV_R |
km2=MAX(1,k-2) |
|
./pkg/generic_advdiff/gad_dst3_adv_r.F |
81 |
GAD_DST3_ADV_R |
Rjm=(tracer(i,j,km2)-tracer(i,j,km1)) |
|
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
55 |
GAD_DST3FL_ADV_R |
INTEGER i,j,kp1,km1,km2 |
|
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
62 |
GAD_DST3FL_ADV_R |
km2=MAX(1,k-2) |
|
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
72 |
GAD_DST3FL_ADV_R |
Rjm=(tracer(i,j,km2)-tracer(i,j,km1)) |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
109 |
GAD_DST3FL_IMPL_R |
Rjh = (tFld(i,j,k-1)-tFld(i,j,km2))*maskC(i,j,km2,bi,bj) |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
143 |
GAD_DST3FL_IMPL_R |
mskM = maskC(i,j,km2,bi,bj)*maskM2 |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
71 |
GAD_DST3FL_IMPL_R |
INTEGER i,j,kp1,km2 |
|
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
84 |
GAD_DST3FL_IMPL_R |
km2=MAX(1,k-2) |
|
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F |
64 |
GAD_FLUXLIMIT_ADV_R |
INTEGER i,j,kp1,km1,km2 |
|
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F |
71 |
GAD_FLUXLIMIT_ADV_R |
km2=MAX(1,k-2) |
|
./pkg/generic_advdiff/gad_fluxlimit_adv_r.F |
91 |
GAD_FLUXLIMIT_ADV_R |
& *maskC(i,j,km2,bi,bj) |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
65 |
GAD_FLUXLIMIT_IMPL_R |
INTEGER i,j,kp1,km1,km2 |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
75 |
GAD_FLUXLIMIT_IMPL_R |
km2=MAX(1,k-2) |
|
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
89 |
GAD_FLUXLIMIT_IMPL_R |
Rjm=(tFld(i,j,km1)-tFld(i,j,km2))*maskC(i,j,km2,bi,bj) |
|
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
34 |
GAD_OS7MP_ADV_R |
INTEGER i,j,kp3,kp2,kp1,km1,km2,km3,km4 |
|
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
53 |
GAD_OS7MP_ADV_R |
km2=MAX(1,k-2) |
|
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
70 |
GAD_OS7MP_ADV_R |
Qim = Q(i,j,km2) |
|
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
77 |
GAD_OS7MP_ADV_R |
MskIm = maskC(i,j,km1,bi,bj) * float(km1-km2) |
|
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
78 |
GAD_OS7MP_ADV_R |
MskImm = maskC(i,j,km2,bi,bj) * float(km2-km3) |
|
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
82 |
GAD_OS7MP_ADV_R |
Qipp = Q(i,j,km2) |
|
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
89 |
GAD_OS7MP_ADV_R |
MskIpp = maskC(i,j,km2,bi,bj) * float(km2-km3) |
|
./pkg/generic_advdiff/gad_os7mp_adv_r.F |
90 |
GAD_OS7MP_ADV_R |
MskIp = maskC(i,j,km1,bi,bj) * float(km1-km2) |
|
./pkg/generic_advdiff/gad_u3_adv_r.F |
54 |
GAD_U3_ADV_R |
INTEGER i,j,kp1,km1,km2 |
|
./pkg/generic_advdiff/gad_u3_adv_r.F |
58 |
GAD_U3_ADV_R |
km2=MAX(1,k-2) |
|
./pkg/generic_advdiff/gad_u3_adv_r.F |
74 |
GAD_U3_ADV_R |
Rjm=(tracer(i,j,km1,bi,bj)-tracer(i,j,km2,bi,bj)) |
|
./pkg/generic_advdiff/gad_u3_adv_r.F |
75 |
GAD_U3_ADV_R |
& *maskC(i,j,km2,bi,bj) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
70 |
GAD_U3C4_IMPL_R |
INTEGER i,j,kp1,km2 |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
80 |
GAD_U3C4_IMPL_R |
km2=MAX(1,k-2) |
|
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
94 |
GAD_U3C4_IMPL_R |
mskM = maskC(i,j,km2,bi,bj)*maskM2 |