File |
Line number |
Procedure |
Code |
./pkg/obcs/orlanski_init.F |
76 |
ORLANSKI_INIT |
WN_STORE_2(I,K,bi,bj)=0. |
./pkg/obcs/ORLANSKI.h |
119 |
NO PROCEDURE |
_RL WN_STORE_2(1-OLx:sNx+OLx,Nr,nSx,nSy) |
./pkg/obcs/ORLANSKI.h |
49 |
NO PROCEDURE |
& WN_STORE_1,WN_STORE_2, |
./pkg/obcs/orlanski_north.F |
181 |
ORLANSKI_NORTH |
IF ((WN_STORE_2(I,K,bi,bj).eq.0.).and. |
./pkg/obcs/orlanski_north.F |
186 |
ORLANSKI_NORTH |
& (ab1*WN_STORE_2(I,K,bi,bj)+ab2*WN_STORE_3(I,K,bi,bj)) |
./pkg/obcs/orlanski_north.F |
237 |
ORLANSKI_NORTH |
WN_STORE_3(I,K,bi,bj)=WN_STORE_2(I,K,bi,bj) |
./pkg/obcs/orlanski_north.F |
239 |
ORLANSKI_NORTH |
WN_STORE_2(I,K,bi,bj)=wVel(I,J_obc-1,K,bi,bj) - |
./pkg/obcs/orlanski_checkpoint.F |
360 |
ORLANSKI_WRITE_CHECKPOINT |
CALL MDSWRITEFIELDXZ(fn,prec,lgf,'RL',Nr,WN_STORE_2,22, |
./pkg/obcs/orlanski_checkpoint.F |
60 |
ORLANSKI_READ_CHECKPOINT |
CALL MDSREADFIELDXZ(fn,prec,'RL',Nr,WN_STORE_2,22,myThid) |