| File |
Line number |
Procedure |
Code |
|
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
38 |
GAD_DST3FL_ADV_R |
_RL Rjm,Rj,Rjp,cfl,d0,d1 |
|
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
71 |
GAD_DST3FL_ADV_R |
d0=(2.D0-cfl)*(1.-cfl)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
76 |
GAD_DST3FL_ADV_R |
psiP=d0+d1*thetaP |
|
./pkg/generic_advdiff/gad_dst3fl_adv_r.F |
82 |
GAD_DST3FL_ADV_R |
psiM=d0+d1*thetaM |
|
./pkg/generic_advdiff/gad_dst3_adv_y.F |
39 |
GAD_DST3_ADV_Y |
_RL Rjm,Rj,Rjp,cfl,d0,d1 |
|
./pkg/generic_advdiff/gad_dst3_adv_y.F |
66 |
GAD_DST3_ADV_Y |
d0=(2.-cfl)*(1.-cfl)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3_adv_y.F |
74 |
GAD_DST3_ADV_Y |
psiP=d0+d1*thetaP |
|
./pkg/generic_advdiff/gad_dst3_adv_y.F |
82 |
GAD_DST3_ADV_Y |
psiM=d0+d1*thetaM |
|
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
37 |
GAD_DST3FL_ADV_Y |
_RL Rjm,Rj,Rjp,cfl,d0,d1,psiP,psiM,thetaP,thetaM |
|
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
55 |
GAD_DST3FL_ADV_Y |
d0=(2.D0-cfl)*(1.D0-cfl)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
60 |
GAD_DST3FL_ADV_Y |
psiP=d0+d1*thetaP |
|
./pkg/generic_advdiff/gad_dst3fl_adv_y.F |
66 |
GAD_DST3FL_ADV_Y |
psiM=d0+d1*thetaM |
|
./pkg/generic_advdiff/gad_dst3_adv_x.F |
39 |
GAD_DST3_ADV_X |
_RL Rjm,Rj,Rjp,cfl,d0,d1 |
|
./pkg/generic_advdiff/gad_dst3_adv_x.F |
64 |
GAD_DST3_ADV_X |
d0=(2.-cfl)*(1.-cfl)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3_adv_x.F |
72 |
GAD_DST3_ADV_X |
psiP=d0+d1*thetaP |
|
./pkg/generic_advdiff/gad_dst3_adv_x.F |
80 |
GAD_DST3_ADV_X |
psiM=d0+d1*thetaM |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
37 |
GAD_DST3FL_ADV_X |
_RL Rjm,Rj,Rjp,cfl,d0,d1,psiP,psiM,thetaP,thetaM |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
53 |
GAD_DST3FL_ADV_X |
d0=(2.D0-cfl)*(1.D0-cfl)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
58 |
GAD_DST3FL_ADV_X |
psiP=d0+d1*thetaP |
|
./pkg/generic_advdiff/gad_dst3fl_adv_x.F |
64 |
GAD_DST3FL_ADV_X |
psiM=d0+d1*thetaM |
|
./pkg/generic_advdiff/gad_dst3_adv_r.F |
38 |
GAD_DST3_ADV_R |
_RL Rjm,Rj,Rjp,cfl,d0,d1 |
|
./pkg/generic_advdiff/gad_dst3_adv_r.F |
79 |
GAD_DST3_ADV_R |
d0=(2.-cfl)*(1.-cfl)*oneSixth |
|
./pkg/generic_advdiff/gad_dst3_adv_r.F |
87 |
GAD_DST3_ADV_R |
psiP=d0+d1*thetaP |
|
./pkg/generic_advdiff/gad_dst3_adv_r.F |
95 |
GAD_DST3_ADV_R |
psiM=d0+d1*thetaM |
|
./lsopt/cubic.F |
40 |
CUBIC |
if (z1.ge.0.d0 .and. discri.ge.0.d0) then |
|
./lsopt/cubic.F |
42 |
CUBIC |
else if (z1.le.0.d0 .and. discri.le.0.d0) then |
|
./pkg/fizhi/fizhi_utils.F |
222 |
QSAT |
_RL d0, d1, d2, d3, d4, d5, d6 |
|
./pkg/fizhi/fizhi_utils.F |
277 |
QSAT |
parameter ( d0 = 0.535098336e+01 * esfac ) |
|
./pkg/fizhi/fizhi_utils.F |
347 |
QSAT |
qx = d0+T*(d1+T*(d2+T*(d3+T*(d4+T*(d5+T*d6))))) |
|
./pkg/ctrl/ctrl_obcsvol.F |
162 |
CTRL_OBCSVOL |
shiftvel(1) = 0. d0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
163 |
CTRL_OBCSVOL |
shiftvel(2) = 0. d0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
177 |
CTRL_OBCSVOL |
tmpflux = 0. d0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
178 |
CTRL_OBCSVOL |
tmparea = 0. d0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
321 |
CTRL_OBCSVOL |
sumvol = 0. d0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
322 |
CTRL_OBCSVOL |
sumarea= 0. d0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
335 |
CTRL_OBCSVOL |
tmpflux = 0. d0 |
|
./pkg/ctrl/ctrl_obcsvol.F |
336 |
CTRL_OBCSVOL |
tmparea = 0. d0 |
|
./pkg/ctrl/ctrl_volflux.F |
177 |
CTRL_VOLFLUX |
tmpflux = 0. d0 |
|
./pkg/ctrl/ctrl_volflux.F |
178 |
CTRL_VOLFLUX |
tmparea = 0. d0 |
|
./pkg/ctrl/ctrl_obcsbal.F |
151 |
CTRL_OBCSBAL |
shiftvel(1) = 0. d0 |
|
./pkg/ctrl/ctrl_obcsbal.F |
152 |
CTRL_OBCSBAL |
shiftvel(2) = 0. d0 |
|
./pkg/ctrl/ctrl_obcsbal.F |
170 |
CTRL_OBCSBAL |
volflux = 0. d0 |
|
./pkg/ctrl/ctrl_obcsbal.F |
171 |
CTRL_OBCSBAL |
area= 0. d0 |
|
./pkg/ctrl/ctrl_init_obcs_variables.F |
124 |
CTRL_INIT_OBCS_VARIABLES |
shiftvel(1) = 0. d0 |
|
./pkg/ctrl/ctrl_init_obcs_variables.F |
125 |
CTRL_INIT_OBCS_VARIABLES |
shiftvel(2) = 0. d0 |
|
./pkg/exf/exf_constants.h |
103 |
NO PROCEDURE |
& atmrho = 1.200 d0 , |
|
./pkg/exf/exf_constants.h |
104 |
NO PROCEDURE |
& atmcp = 1005.000 d0 , |
|
./pkg/exf/exf_constants.h |
105 |
NO PROCEDURE |
& flamb = 2500000.000 d0 , |
|
./pkg/exf/exf_constants.h |
106 |
NO PROCEDURE |
& umin = 0.500 d0 , |
|
./pkg/exf/exf_constants.h |
107 |
NO PROCEDURE |
& zolmin = -100.000 d0 , |
|
./pkg/exf/exf_constants.h |
108 |
NO PROCEDURE |
& zref = 10.000 d0 , |
|
./pkg/exf/exf_constants.h |
109 |
NO PROCEDURE |
& karman = 0.400 d0 , |
|
./pkg/exf/exf_constants.h |
110 |
NO PROCEDURE |
& cvapor_fac = 640380.000 d0 , |
|
./pkg/exf/exf_constants.h |
111 |
NO PROCEDURE |
& cvapor_exp = 5107.400 d0 , |
|
./pkg/exf/exf_constants.h |
112 |
NO PROCEDURE |
& humid_fac = 0.606 d0 , |
|
./pkg/exf/exf_constants.h |
113 |
NO PROCEDURE |
& gamma_blk = 0.010 d0 , |
|
./pkg/exf/exf_constants.h |
114 |
NO PROCEDURE |
& saltsat = 0.980 d0 , |
|
./pkg/exf/exf_constants.h |
115 |
NO PROCEDURE |
& psim_fac = 5.000 d0 , |
|
./pkg/exf/exf_constants.h |
116 |
NO PROCEDURE |
& cen2kel = 273.150 d0 , |
|
./pkg/exf/exf_constants.h |
117 |
NO PROCEDURE |
& hu = 10.000 d0 , |
|
./pkg/exf/exf_constants.h |
118 |
NO PROCEDURE |
& ht = 2.000 d0 , |
|
./pkg/exf/exf_constants.h |
119 |
NO PROCEDURE |
& hq = 2.000 d0 |
|
./pkg/exf/exf_constants.h |
148 |
NO PROCEDURE |
& u11 = 11. d0 , |