File |
Line number |
Procedure |
Code |
./pkg/obcs/orlanski_south.F |
100 |
ORLANSKI_SOUTH |
IF ((US_STORE_2(I,K,bi,bj).eq.0.).and. |
./pkg/obcs/orlanski_south.F |
105 |
ORLANSKI_SOUTH |
& (ab1*US_STORE_2(I,K,bi,bj) + ab2*US_STORE_3(I,K,bi,bj)) |
./pkg/obcs/orlanski_south.F |
204 |
ORLANSKI_SOUTH |
US_STORE_3(I,K,bi,bj)=US_STORE_2(I,K,bi,bj) |
./pkg/obcs/orlanski_south.F |
206 |
ORLANSKI_SOUTH |
US_STORE_2(I,K,bi,bj)=uVel(I,J_obc+2,K,bi,bj) - |
./pkg/obcs/orlanski_init.F |
54 |
ORLANSKI_INIT |
US_STORE_2(I,K,bi,bj)=0. |
./pkg/obcs/ORLANSKI.h |
123 |
NO PROCEDURE |
_RL US_STORE_2(1-OLx:sNx+OLx,Nr,nSx,nSy) |
./pkg/obcs/ORLANSKI.h |
51 |
NO PROCEDURE |
& US_STORE_1,US_STORE_2, |
./pkg/obcs/orlanski_checkpoint.F |
379 |
ORLANSKI_WRITE_CHECKPOINT |
CALL MDSWRITEFIELDXZ(fn,prec,lgf,'RL',Nr,US_STORE_2,2, |
./pkg/obcs/orlanski_checkpoint.F |
70 |
ORLANSKI_READ_CHECKPOINT |
CALL MDSREADFIELDXZ(fn,prec,'RL',Nr,US_STORE_2,2,myThid) |