File |
Line number |
Procedure |
Code |
./pkg/obcs/orlanski_init.F |
36 |
ORLANSKI_INIT |
TN_STORE_1(I,K,bi,bj)=0. |
./pkg/obcs/ORLANSKI.h |
110 |
NO PROCEDURE |
_RL TN_STORE_1(1-OLx:sNx+OLx,Nr,nSx,nSy) |
./pkg/obcs/ORLANSKI.h |
45 |
NO PROCEDURE |
& TN_STORE_1,TN_STORE_2, |
./pkg/obcs/orlanski_north.F |
144 |
ORLANSKI_NORTH |
CL=-(theta(I,J_obc-1,K,bi,bj)-TN_STORE_1(I,K,bi,bj))/ |
./pkg/obcs/orlanski_north.F |
158 |
ORLANSKI_NORTH |
& ab2*(TN_STORE_4(I,K,bi,bj)-TN_STORE_1(I,K,bi,bj))) |
./pkg/obcs/orlanski_north.F |
224 |
ORLANSKI_NORTH |
TN_STORE_1(I,K,bi,bj)=theta(I,J_obc-1,K,bi,bj) |
./pkg/obcs/orlanski_checkpoint.F |
333 |
ORLANSKI_WRITE_CHECKPOINT |
CALL MDSWRITEFIELDXZ(fn,prec,lgf,'RL',Nr,TN_STORE_1,9, |
./pkg/obcs/orlanski_checkpoint.F |
46 |
ORLANSKI_READ_CHECKPOINT |
CALL MDSREADFIELDXZ(fn,prec,'RL',Nr,TN_STORE_1,9,myThid) |