| File |
Line number |
Procedure |
Code |
|
./pkg/dic/carbon_chem.F |
211 |
CALC_PCO2 |
df = ((k1local*diclocal*b) - k1local*x*diclocal*db)/b2 - |
|
./pkg/dic/carbon_chem.F |
223 |
CALC_PCO2 |
deltax = - fn/df |
|
./pkg/dic/carbon_chem.F |
94 |
CALC_PCO2 |
_RL df |
|
./model/src/impldiff.F |
229 |
IMPLDIFF |
df(i,j) = 0. _d 0 |
|
./model/src/impldiff.F |
235 |
IMPLDIFF |
df(i,j) = |
|
./model/src/impldiff.F |
242 |
IMPLDIFF |
CALL DIAGNOSTICS_FILL(df,diagName, k,1, 2,bi,bj, myThid) |
|
./model/src/impldiff.F |
68 |
IMPLDIFF |
_RL df (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2495 |
FLXCO2 |
subroutine FLXCO2(m,n,np,swc,swh,csm,df) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2511 |
FLXCO2 |
_RL df(m,n,np+1) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
2547 |
FLXCO2 |
df(i,j,k)=df(i,j,k)+0.0343*(x1-y2) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
783 |
SORAD |
_RL swh(m,n,np+1),so2(m,n,np+1),df(m,n,np+1) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
845 |
SORAD |
df(i,j,k)=0. |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
879 |
SORAD |
df(i,j,k)=df(i,j,k)+0.0287*(1.-expmn(-0.00027*sqrt(x))) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
897 |
SORAD |
call FLXCO2(m,n,np,so2,swh,csm,df) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
904 |
SORAD |
flc(i,j,k)=flc(i,j,k)-df(i,j,k) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
928 |
SORAD |
sdf(i,j)=sdf(i,j)+df(i,j,k)*sclr(i,j)*fcld(i,j,k) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
931 |
SORAD |
flx(i,j,k+1)=flx(i,j,k+1)-sdf(i,j)-df(i,j,k+1)*sclr(i,j) |
|
./verification/fizhi-cs-aqualev10/code/fizhi_swrad.F |
941 |
SORAD |
x = (-sdf(i,j)-df(i,j,np+1)*sclr(i,j))/x |
|
./pkg/kpp/kpp_transport_ptr.F |
12 |
KPP_TRANSPORT_PTR |
O df ) |
|
./pkg/kpp/kpp_transport_ptr.F |
53 |
KPP_TRANSPORT_PTR |
_RL df (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/kpp/kpp_transport_ptr.F |
71 |
KPP_TRANSPORT_PTR |
df(i,j) = - _rA(i,j,bi,bj) |
|
./pkg/kpp/kpp_transport_ptr.F |
82 |
KPP_TRANSPORT_PTR |
df(i,j) = - _rA(i,j,bi,bj) |
|
./pkg/kpp/kpp_transport_t.F |
11 |
KPP_TRANSPORT_T |
O df ) |
|
./pkg/kpp/kpp_transport_t.F |
48 |
KPP_TRANSPORT_T |
_RL df (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/kpp/kpp_transport_t.F |
66 |
KPP_TRANSPORT_T |
df(i,j) = - _rA(i,j,bi,bj) |
|
./pkg/kpp/kpp_transport_t.F |
81 |
KPP_TRANSPORT_T |
df(i,j) = - _rA(i,j,bi,bj) |
|
./pkg/kpp/kpp_transport_s.F |
11 |
KPP_TRANSPORT_S |
O df ) |
|
./pkg/kpp/kpp_transport_s.F |
44 |
KPP_TRANSPORT_S |
_RL df (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/kpp/kpp_transport_s.F |
62 |
KPP_TRANSPORT_S |
df(i,j) = - _rA(i,j,bi,bj) |
|
./pkg/kpp/kpp_transport_s.F |
73 |
KPP_TRANSPORT_S |
df(i,j) = - _rA(i,j,bi,bj) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
288 |
GAD_IMPLICIT_R |
df(i,j) = 0. _d 0 |
|
./pkg/generic_advdiff/gad_implicit_r.F |
294 |
GAD_IMPLICIT_R |
df(i,j) = |
|
./pkg/generic_advdiff/gad_implicit_r.F |
301 |
GAD_IMPLICIT_R |
CALL DIAGNOSTICS_FILL(df,diagName, k,1, 2,bi,bj, myThid) |
|
./pkg/generic_advdiff/gad_implicit_r.F |
81 |
GAD_IMPLICIT_R |
_RL df (1-Olx:sNx+Olx,1-Oly:sNy+Oly) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
124 |
GAD_CALC_RHS |
_RL df (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
152 |
GAD_CALC_RHS |
df(i,j) = 0. _d 0 |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
236 |
GAD_CALC_RHS |
CALL GAD_DIFF_X(bi,bj,k,xA,diffKh,localT,df,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
240 |
GAD_CALC_RHS |
df(i,j) = 0. _d 0 |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
247 |
GAD_CALC_RHS |
CALL GAD_BIHARM_X(bi,bj,k,xA,df4,diffK4,df,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
257 |
GAD_CALC_RHS |
U df, |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
263 |
GAD_CALC_RHS |
fZon(i,j) = fZon(i,j) + df(i,j) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
273 |
GAD_CALC_RHS |
CALL DIAGNOSTICS_FILL(df,diagName, k,1, 2,bi,bj, myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
331 |
GAD_CALC_RHS |
CALL GAD_DIFF_Y(bi,bj,k,yA,diffKh,localT,df,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
335 |
GAD_CALC_RHS |
df(i,j) = 0. _d 0 |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
342 |
GAD_CALC_RHS |
CALL GAD_BIHARM_Y(bi,bj,k,yA,df4,diffK4,df,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
352 |
GAD_CALC_RHS |
U df, |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
358 |
GAD_CALC_RHS |
fMer(i,j) = fMer(i,j) + df(i,j) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
368 |
GAD_CALC_RHS |
CALL DIAGNOSTICS_FILL(df,diagName, k,1, 2,bi,bj, myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
432 |
GAD_CALC_RHS |
df(i,j) = 0. _d 0 |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
436 |
GAD_CALC_RHS |
CALL GAD_DIFF_R(bi,bj,k,KappaR,tracer,df,myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
446 |
GAD_CALC_RHS |
U df, |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
453 |
GAD_CALC_RHS |
fVerT(i,j,kUp) = fVerT(i,j,kUp) + df(i,j)*maskUp(i,j) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
463 |
GAD_CALC_RHS |
CALL DIAGNOSTICS_FILL(df,diagName, k,1, 2,bi,bj, myThid) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
472 |
GAD_CALC_RHS |
df(i,j) = 0. _d 0 |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
478 |
GAD_CALC_RHS |
O df ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
482 |
GAD_CALC_RHS |
O df ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
488 |
GAD_CALC_RHS |
O df ) |
|
./pkg/generic_advdiff/gad_calc_rhs.F |
496 |
GAD_CALC_RHS |
fVerT(i,j,kUp) = fVerT(i,j,kUp) + df(i,j)*maskUp(i,j) |
|
./pkg/cal/cal_timepassed.F |
110 |
CAL_TIMEPASSED |
call CAL_CONVDATE( initialdate,yf,mf,df,sf,lf,wf,mythid ) |
|
./pkg/cal/cal_timepassed.F |
113 |
CAL_TIMEPASSED |
call CAL_CONVDATE( finaldate,yf,mf,df,sf,lf,wf,mythid ) |
|
./pkg/cal/cal_timepassed.F |
118 |
CAL_TIMEPASSED |
ndays = df - di |
|
./pkg/cal/cal_timepassed.F |
128 |
CAL_TIMEPASSED |
sf = sf + (df-1)*secondsperday |
|
./pkg/cal/cal_timepassed.F |
53 |
CAL_TIMEPASSED |
integer di,df |
|
./pkg/fizhi/fizhi_swrad.F |
2494 |
FLXCO2 |
subroutine FLXCO2(m,n,np,swc,swh,csm,df) |
|
./pkg/fizhi/fizhi_swrad.F |
2510 |
FLXCO2 |
_RL df(m,n,np+1) |
|
./pkg/fizhi/fizhi_swrad.F |
2546 |
FLXCO2 |
df(i,j,k)=df(i,j,k)+0.0343*(x1-y2) |
|
./pkg/fizhi/fizhi_swrad.F |
782 |
SORAD |
_RL swh(m,n,np+1),so2(m,n,np+1),df(m,n,np+1) |
|
./pkg/fizhi/fizhi_swrad.F |
844 |
SORAD |
df(i,j,k)=0. |
|
./pkg/fizhi/fizhi_swrad.F |
878 |
SORAD |
df(i,j,k)=df(i,j,k)+0.0287*(1.-expmn(-0.00027*sqrt(x))) |
|
./pkg/fizhi/fizhi_swrad.F |
896 |
SORAD |
call FLXCO2(m,n,np,so2,swh,csm,df) |
|
./pkg/fizhi/fizhi_swrad.F |
903 |
SORAD |
flc(i,j,k)=flc(i,j,k)-df(i,j,k) |
|
./pkg/fizhi/fizhi_swrad.F |
927 |
SORAD |
sdf(i,j)=sdf(i,j)+df(i,j,k)*sclr(i,j)*fcld(i,j,k) |
|
./pkg/fizhi/fizhi_swrad.F |
930 |
SORAD |
flx(i,j,k+1)=flx(i,j,k+1)-sdf(i,j)-df(i,j,k+1)*sclr(i,j) |
|
./pkg/fizhi/fizhi_swrad.F |
940 |
SORAD |
x = (-sdf(i,j)-df(i,j,np+1)*sclr(i,j))/x |
|
./pkg/exf/exf_getffieldrec.F |
206 |
EXF_GETFFIELDREC |
call CAL_CONVDATE( mydate,yf,mf,df,sf,lf,wf,mythid ) |
|
./pkg/exf/exf_getffieldrec.F |
210 |
EXF_GETFFIELDREC |
else if ( mf.EQ.1 .AND. df.EQ.1 .AND. |
|
./pkg/exf/exf_getffieldrec.F |
220 |
EXF_GETFFIELDREC |
if ( mf.EQ.1 .AND. df.EQ.1 .AND. |
|
./pkg/exf/exf_getffieldrec.F |
94 |
EXF_GETFFIELDREC |
integer di,df,dp,dn |
|
./pkg/gmredi/gmredi_xtransport.F |
147 |
GMREDI_XTRANSPORT |
df(i,j) = df(i,j) - xA(i,j)*Kuz(i,j,k,bi,bj)*dTdz(i,j) |
|
./pkg/gmredi/gmredi_xtransport.F |
171 |
GMREDI_XTRANSPORT |
df(i,j) = df(i,j) |
|
./pkg/gmredi/gmredi_xtransport.F |
44 |
GMREDI_XTRANSPORT |
_RL df (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/gmredi/gmredi_xtransport.F |
99 |
GMREDI_XTRANSPORT |
df(i,j) = df(i,j) |
|
./pkg/gmredi/gmredi_xtransport.F |
9 |
GMREDI_XTRANSPORT |
U df, |
|
./pkg/gmredi/gmredi_rtransport.F |
127 |
GMREDI_RTRANSPORT |
df(i,j) = df(i,j) |
|
./pkg/gmredi/gmredi_rtransport.F |
151 |
GMREDI_RTRANSPORT |
df(i,j) = df(i,j) |
|
./pkg/gmredi/gmredi_rtransport.F |
43 |
GMREDI_RTRANSPORT |
_RL df (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/gmredi/gmredi_rtransport.F |
9 |
GMREDI_RTRANSPORT |
U df, |
|
./pkg/gmredi/gmredi_ytransport.F |
146 |
GMREDI_YTRANSPORT |
df(i,j) = df(i,j) - yA(i,j)*Kvz(i,j,k,bi,bj)*dTdz(i,j) |
|
./pkg/gmredi/gmredi_ytransport.F |
171 |
GMREDI_YTRANSPORT |
df(i,j) = df(i,j) |
|
./pkg/gmredi/gmredi_ytransport.F |
44 |
GMREDI_YTRANSPORT |
_RL df (1-OLx:sNx+OLx,1-OLy:sNy+OLy) |
|
./pkg/gmredi/gmredi_ytransport.F |
99 |
GMREDI_YTRANSPORT |
df(i,j) = df(i,j) |
|
./pkg/gmredi/gmredi_ytransport.F |
9 |
GMREDI_YTRANSPORT |
U df, |