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 |
79 |
GAD_C4_ADV_R |
Rjm = (tracer(i,j,km1)-tracer(i,j,km2))*maskC(i,j,km1,bi,bj) |
./pkg/generic_advdiff/gad_dst3_adv_r.F |
59 |
GAD_DST3_ADV_R |
INTEGER i,j,kp1,km1,km2 |
./pkg/generic_advdiff/gad_dst3_adv_r.F |
73 |
GAD_DST3_ADV_R |
km2=MAX(1,k-2) |
./pkg/generic_advdiff/gad_dst3_adv_r.F |
83 |
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 |
77 |
GAD_DST3FL_ADV_R |
Rjm=(tracer(i,j,km2)-tracer(i,j,km1)) |
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
112 |
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 |
146 |
GAD_DST3FL_IMPL_R |
mskM = maskC(i,j,km2,bi,bj)*maskM2 |
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
73 |
GAD_DST3FL_IMPL_R |
INTEGER i,j,kp1,km2 |
./pkg/generic_advdiff/gad_dst3fl_impl_r.F |
86 |
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 |
67 |
GAD_FLUXLIMIT_IMPL_R |
INTEGER i,j,kp1,km1,km2 |
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
77 |
GAD_FLUXLIMIT_IMPL_R |
km2=MAX(1,k-2) |
./pkg/generic_advdiff/gad_fluxlimit_impl_r.F |
92 |
GAD_FLUXLIMIT_IMPL_R |
Rjm=(tFld(i,j,km1)-tFld(i,j,km2))*maskC(i,j,km2,bi,bj) |
./pkg/generic_advdiff/gad_implicit_r.F |
358 |
GAD_IMPLICIT_R |
km2=MAX(1,k-2) |
./pkg/generic_advdiff/gad_implicit_r.F |
374 |
GAD_IMPLICIT_R |
& + gTracer(i,j,km2)*a5d(i,j,k) |
./pkg/generic_advdiff/gad_implicit_r.F |
93 |
GAD_IMPLICIT_R |
INTEGER km1, km2, kp1, kp2 |
./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 |
73 |
GAD_U3_ADV_R |
Rjm = (tracer(i,j,km1)-tracer(i,j,km2))*maskC(i,j,km2,bi,bj) |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
104 |
GAD_U3C4_IMPL_R |
mskM = maskC(i,j,km2,bi,bj)*maskM2 |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
136 |
GAD_U3C4_IMPL_R |
mskM = maskC(i,j,km2,bi,bj)*maskM2 |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
72 |
GAD_U3C4_IMPL_R |
INTEGER i,j,kp1,km2 |
./pkg/generic_advdiff/gad_u3c4_impl_r.F |
88 |
GAD_U3C4_IMPL_R |
km2=MAX(1,k-2) |