| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/OBCS_FIELDS.h |
161 |
NO PROCEDURE |
& OBWuStevens, OBWtStevens, OBWsStevens |
|
./pkg/obcs/OBCS_FIELDS.h |
163 |
NO PROCEDURE |
_RL OBWtStevens (1-Oly:sNy+Oly,Nr,nSx,nSy) |
|
./pkg/obcs/obcs_calc_stevens.F |
392 |
OBCS_CALC_STEVENS |
dTracTime = (theta(I+1,J,K,bi,bj)-OBWtStevens(J,K,bi,bj)) |
|
./pkg/obcs/obcs_calc_stevens.F |
863 |
OBCS_STEVENS_SAVE_TRACERS |
OBWtStevens(j,k,bi,bj) = theta(Iobc+1,j,k,bi,bj) |
|
./pkg/obcs/obcs_init_variables.F |
152 |
OBCS_INIT_VARIABLES |
OBWtStevens(j,k,bi,bj)=0. _d 0 |
|
./pkg/obcs/obcs_read_pickup.F |
252 |
OBCS_READ_PICKUP |
CALL READ_REC_YZ_RL(fn,prec,Nr,OBWtStevens, 2,myIter,myThid) |
|
./pkg/obcs/obcs_write_pickup.F |
240 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_YZ_RL(fn,prec,Nr,OBWtStevens, 2,myIter,myThid) |