| File |
Line number |
Procedure |
Code |
|
./pkg/shelfice/shelfice_thermodynamics.F |
133 |
SHELFICE_THERMODYNAMICS |
pLoc = ABS(R_shelfIce(I,J,bi,bj)) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
134 |
SHELFICE_THERMODYNAMICS |
IF ( K .NE. 0 .AND. pLoc .GT. 0. _d 0 ) THEN |
|
./pkg/shelfice/shelfice_thermodynamics.F |
141 |
SHELFICE_THERMODYNAMICS |
eps4 = b*pLoc + c0 |
|
./pkg/shelfice/shelfice_thermodynamics.F |
49 |
SHELFICE_THERMODYNAMICS |
_RL tLoc, sLoc, pLoc |
|
./pkg/shelfice/shelfice_thermodynamics.F |
83 |
SHELFICE_THERMODYNAMICS |
pLoc = ABS(R_shelfIce(I,J,bi,bj)) |
|
./pkg/shelfice/shelfice_thermodynamics.F |
84 |
SHELFICE_THERMODYNAMICS |
IF ( K .NE. 0 .AND. pLoc .GT. 0. _d 0 ) THEN |
|
./pkg/shelfice/shelfice_thermodynamics.F |
91 |
SHELFICE_THERMODYNAMICS |
& + b*pLoc + c0 |
|
./model/src/ini_eos.F |
415 |
CHECK_EOS |
& pLoc(kcheck), rhoLoc(i,j), myThid ) |
|
./model/src/find_rho.F |
564 |
FIND_RHO_SCALAR |
I tLoc, sLoc, pLoc, |
|
./model/src/find_rho.F |
585 |
FIND_RHO_SCALAR |
_RL sLoc, tLoc, pLoc |
|
./model/src/find_rho.F |
656 |
FIND_RHO_SCALAR |
p1 = pLoc*SItoBar |
|
./model/src/find_rho.F |
733 |
FIND_RHO_SCALAR |
p1 = pLoc*SItodBar |
|
./model/src/ini_linear_phisurf.F |
110 |
INI_LINEAR_PHISURF |
pLoc = Ro_surf(I,J,bi,bj) |
|
./model/src/ini_linear_phisurf.F |
112 |
INI_LINEAR_PHISURF |
I tRef(k), sRef(k), pLoc, |
|
./model/src/ini_linear_phisurf.F |
49 |
INI_LINEAR_PHISURF |
_RL pLoc, rhoLoc |
|
./model/src/ini_phiref.F |
102 |
INI_PHIREF |
I tRef(k), sRef(k), pLoc, |
|
./model/src/ini_phiref.F |
120 |
INI_PHIREF |
pLoc = rC(k) |
|
./model/src/ini_phiref.F |
122 |
INI_PHIREF |
I tRef(k), sRef(k), pLoc, |
|
./model/src/ini_phiref.F |
130 |
INI_PHIREF |
pLoc = rF(k) |
|
./model/src/ini_phiref.F |
132 |
INI_PHIREF |
I tRef(k-1), sRef(k-1), pLoc, |
|
./model/src/ini_phiref.F |
135 |
INI_PHIREF |
I tRef(k), sRef(k), pLoc, |
|
./model/src/ini_phiref.F |
43 |
INI_PHIREF |
_RL pLoc, rhoUp, rhoDw |
|
./model/src/ini_phiref.F |
87 |
INI_PHIREF |
pLoc = -rhoConst*rC(k)*gravity |
|
./model/src/ini_phiref.F |
89 |
INI_PHIREF |
I tRef(k), sRef(k), pLoc, |
|
./model/src/ini_phiref.F |
97 |
INI_PHIREF |
pLoc = -rhoConst*rF(k)*gravity |
|
./model/src/ini_phiref.F |
99 |
INI_PHIREF |
I tRef(k-1), sRef(k-1), pLoc, |
|
./pkg/opps/opps_calc.F |
471 |
OPPS_CALC |
_RL pLoc |
|
./pkg/opps/opps_calc.F |
492 |
OPPS_CALC |
pLoc = rhoConst*( totPhiHyd(i,j,kRef,bi,bj) |
|
./pkg/opps/opps_calc.F |
496 |
OPPS_CALC |
pLoc = -rhoConst*rC(kRef)*gravity*maskC(i,j,kRef,bi,bj) |
|
./pkg/opps/opps_calc.F |
501 |
OPPS_CALC |
pLoc = rC(kRef)* maskC(i,j,kRef,bi,bj) |
|
./pkg/opps/opps_calc.F |
546 |
OPPS_CALC |
p1 = pLoc*SItoBar |
|
./pkg/opps/opps_calc.F |
623 |
OPPS_CALC |
p1 = pLoc*SItodBar |