| File |
Line number |
Procedure |
Code |
|
./pkg/fizhi/co2-tran3.h |
100 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip= 6, 6)/ |
|
./pkg/fizhi/co2-tran3.h |
10 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip= 1, 1)/ |
|
./pkg/fizhi/co2-tran3.h |
118 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip= 7, 7)/ |
|
./pkg/fizhi/co2-tran3.h |
136 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip= 8, 8)/ |
|
./pkg/fizhi/co2-tran3.h |
154 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip= 9, 9)/ |
|
./pkg/fizhi/co2-tran3.h |
172 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip=10,10)/ |
|
./pkg/fizhi/co2-tran3.h |
190 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip=11,11)/ |
|
./pkg/fizhi/co2-tran3.h |
208 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip=12,12)/ |
|
./pkg/fizhi/co2-tran3.h |
226 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip=13,13)/ |
|
./pkg/fizhi/co2-tran3.h |
244 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip=14,14)/ |
|
./pkg/fizhi/co2-tran3.h |
262 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip=15,15)/ |
|
./pkg/fizhi/co2-tran3.h |
280 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip=16,16)/ |
|
./pkg/fizhi/co2-tran3.h |
28 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip= 2, 2)/ |
|
./pkg/fizhi/co2-tran3.h |
298 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip=17,17)/ |
|
./pkg/fizhi/co2-tran3.h |
316 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip=18,18)/ |
|
./pkg/fizhi/co2-tran3.h |
334 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip=19,19)/ |
|
./pkg/fizhi/co2-tran3.h |
352 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip=20,20)/ |
|
./pkg/fizhi/co2-tran3.h |
370 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip=21,21)/ |
|
./pkg/fizhi/co2-tran3.h |
388 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip=22,22)/ |
|
./pkg/fizhi/co2-tran3.h |
406 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip=23,23)/ |
|
./pkg/fizhi/co2-tran3.h |
424 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip=24,24)/ |
|
./pkg/fizhi/co2-tran3.h |
442 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip=25,25)/ |
|
./pkg/fizhi/co2-tran3.h |
460 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip=26,26)/ |
|
./pkg/fizhi/co2-tran3.h |
46 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip= 3, 3)/ |
|
./pkg/fizhi/co2-tran3.h |
64 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip= 4, 4)/ |
|
./pkg/fizhi/co2-tran3.h |
82 |
NO PROCEDURE |
data ((c2(ip,iw,1),iw=1,24),ip= 5, 5)/ |
|
./pkg/fizhi/fizhi_lwrad.F |
1455 |
IRRAD |
* w1,p1,dwe,dpe,c1,c2,c3,trant) |
|
./pkg/fizhi/fizhi_lwrad.F |
614 |
IRRAD |
_RL c1 (nx,nc,nt),c2 (nx,nc,nt),c3 (nx,nc,nt) |
|
./pkg/fizhi/fizhi_lwrad.F |
826 |
IRRAD |
c2 (ip,iw,it)= c2(ip,iw,1) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
143 |
GMREDI_CALC_PSI_BVP |
c2 = MAX( wkb_cW(i,j)*wkb_cW(i,j), GM_BVP_cHat2Min ) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
144 |
GMREDI_CALC_PSI_BVP |
GM_a3d(i,j,k) = -c2*recip_drC(k) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
147 |
GMREDI_CALC_PSI_BVP |
& + c2*recip_drC(k) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
150 |
GMREDI_CALC_PSI_BVP |
GM_c3d(i,j,k) = -c2*recip_drC(k) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
215 |
GMREDI_CALC_PSI_BVP |
c2 = MAX( wkb_cS(i,j)*wkb_cS(i,j), GM_BVP_cHat2Min ) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
216 |
GMREDI_CALC_PSI_BVP |
GM_a3d(i,j,k) = -c2*recip_drC(k) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
219 |
GMREDI_CALC_PSI_BVP |
& + c2*recip_drC(k) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
222 |
GMREDI_CALC_PSI_BVP |
GM_c3d(i,j,k) = -c2*recip_drC(k) |
|
./pkg/gmredi/gmredi_calc_psi_bvp.F |
60 |
GMREDI_CALC_PSI_BVP |
_RL rPI, c2 |
|
./pkg/openad/seawater.F |
156 |
SW_ADTG |
_RL a0,a1,a2,a3,b0,b1,c0,c1,c2,c3,d0,d1,e0,e1,e2 |
|
./pkg/openad/seawater.F |
171 |
SW_ADTG |
c2 = +8.733 _d -12 |
|
./pkg/openad/seawater.F |
183 |
SW_ADTG |
& + ( (c0 + (c1 + (c2 + c3*T)*T)*T) + (d0 + d1*T)*(S-sref) )*P |
|
./model/src/seawater.F |
148 |
NO PROCEDURE |
_RL a0,a1,a2,a3,b0,b1,c0,c1,c2,c3,d0,d1,e0,e1,e2 |
|
./model/src/seawater.F |
163 |
NO PROCEDURE |
c2 = +8.733 _d -12 |
|
./model/src/seawater.F |
175 |
NO PROCEDURE |
& + ( (c0 + (c1 + (c2 + c3*T)*T)*T) + (d0 + d1*T)*(S-sref) )*P |