| File |
Line number |
Procedure |
Code |
|
./model/src/solve_for_pressure.F |
130 |
SOLVE_FOR_PRESSURE |
& +phi_nh(i,j,1,bi,bj)*horiVertRatio/gravity ) |
|
./model/src/solve_for_pressure.F |
134 |
SOLVE_FOR_PRESSURE |
& +phi_nh(i,j,1,bi,bj)*horiVertRatio/gravity ) |
|
./model/src/solve_for_pressure.F |
362 |
SOLVE_FOR_PRESSURE |
U phi_nh, |
|
./model/src/solve_for_pressure.F |
367 |
SOLVE_FOR_PRESSURE |
_EXCH_XYZ_R8(phi_nh, myThid ) |
|
./model/src/correction_step.F |
76 |
CORRECTION_STEP |
& (phi_nh(i,j,k,bi,bj)-phi_nh(i-1,j,k,bi,bj)) |
|
./model/src/correction_step.F |
90 |
CORRECTION_STEP |
& (phi_nh(i,j,k,bi,bj)-phi_nh(i,j-1,k,bi,bj)) |
|
./verification/rotating_tank/code/checkpoint.F |
110 |
READ_CHECKPOINT |
CALL READ_REC_XYZ_RL('phi_nh',phi_nh,1,myIter,myThid) |
|
./verification/rotating_tank/code/checkpoint.F |
153 |
READ_CHECKPOINT |
CALL MDSREADFIELD(fn,prec,'RL',Nr,phi_nh,1,myThid) |
|
./verification/rotating_tank/code/checkpoint.F |
219 |
READ_CHECKPOINT |
_EXCH_XYZ_R8(phi_nh, myThid ) |
|
./verification/rotating_tank/code/checkpoint.F |
358 |
WRITE_CHECKPOINT |
CALL WRITE_REC_XYZ_RL('phi_nh',phi_nh,1,myIter,myThid) |
|
./verification/rotating_tank/code/checkpoint.F |
417 |
WRITE_CHECKPOINT |
CALL MDSWRITEFIELD(fn,prec,lgf,'RL',Nr,phi_nh,1,myIter,myThid) |
|
./model/inc/DYNVARS.h |
70 |
NO PROCEDURE |
COMMON /DYNVARS_NH/ phi_nh |
|
./model/inc/DYNVARS.h |
71 |
NO PROCEDURE |
_RL phi_nh(1-OLx:sNx+OLx,1-OLy:sNy+OLy,Nr,nSx,nSy) |
|
./model/src/checkpoint.F |
126 |
READ_CHECKPOINT |
CALL READ_REC_XYZ_RL('phi_nh',phi_nh,1,myIter,myThid) |
|
./model/src/checkpoint.F |
221 |
READ_CHECKPOINT |
CALL MDSREADFIELD(fn,prec,'RL',Nr,phi_nh,1,myThid) |
|
./model/src/checkpoint.F |
262 |
READ_CHECKPOINT |
CALL MNC_CW_RL_R('D',fn,0,0,'phi_nh', phi_nh, myThid) |
|
./model/src/checkpoint.F |
307 |
READ_CHECKPOINT |
_EXCH_XYZ_R8(phi_nh, myThid ) |
|
./model/src/checkpoint.F |
512 |
WRITE_CHECKPOINT_NOW |
CALL WRITE_REC_XYZ_RL('phi_nh',phi_nh,1,myIter,myThid) |
|
./model/src/checkpoint.F |
584 |
WRITE_CHECKPOINT_NOW |
CALL MDSWRITEFIELD(fn,prec,lgf,'RL',Nr,phi_nh, 1, |
|
./model/src/checkpoint.F |
622 |
WRITE_CHECKPOINT_NOW |
CALL MNC_CW_RL_W('D',fn,0,0,'phi_nh', phi_nh, myThid) |
|
./model/src/ini_pnh.F |
52 |
INI_PNH |
phi_nh(I,J,K,bi,bj) = 0. _d 0 |
|
./model/src/ini_pnh.F |
65 |
INI_PNH |
_EXCH_XYZ_R8(phi_nh, myThid) |
|
./model/src/write_state.F |
109 |
WRITE_STATE |
CALL WRITE_REC_XYZ_RL( 'PNH',phi_nh,iRec,myIter,myThid) |
|
./model/src/write_state.F |
138 |
WRITE_STATE |
CALL WRITE_FLD_XYZ_RL( 'PNH.',suff,phi_nh,myIter,myThid) |
|
./model/src/write_state.F |
187 |
WRITE_STATE |
CALL MNC_CW_RL_W('D','state',0,0,'phi_nh',phi_nh,myThid) |