| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/ORLANSKI.h |
139 |
NO PROCEDURE |
_RL WS_STORE_2(1-OLx:sNx+OLx,Nr,nSx,nSy) |
|
./pkg/obcs/ORLANSKI.h |
59 |
NO PROCEDURE |
& WS_STORE_1,WS_STORE_2, |
|
./pkg/obcs/obcs_read_pickup.F |
123 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,WS_STORE_2,22,myIter,myThid) |
|
./pkg/obcs/obcs_write_pickup.F |
124 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,WS_STORE_2,22,myIter,myThid) |
|
./pkg/obcs/orlanski_init.F |
80 |
ORLANSKI_INIT |
WS_STORE_2(I,K,bi,bj)=0. |
|
./pkg/obcs/orlanski_south.F |
184 |
ORLANSKI_SOUTH |
IF ((WS_STORE_2(I,K,bi,bj).eq.0.).and. |
|
./pkg/obcs/orlanski_south.F |
189 |
ORLANSKI_SOUTH |
& (ab1*WS_STORE_2(I,K,bi,bj)+ab2*WS_STORE_3(I,K,bi,bj)) |
|
./pkg/obcs/orlanski_south.F |
242 |
ORLANSKI_SOUTH |
WS_STORE_3(I,K,bi,bj)=WS_STORE_2(I,K,bi,bj) |
|
./pkg/obcs/orlanski_south.F |
244 |
ORLANSKI_SOUTH |
WS_STORE_2(I,K,bi,bj)=wVel(I,J_obc+2,K,bi,bj) - |