File |
Line number |
Procedure |
Code |
./pkg/obcs/OBCS_FIELDS.h |
93 |
NO PROCEDURE |
& OBSvStevens, OBStStevens, OBSsStevens |
./pkg/obcs/OBCS_FIELDS.h |
94 |
NO PROCEDURE |
_RL OBSvStevens (1-Olx:sNx+Olx,Nr,nSx,nSy) |
./pkg/obcs/obcs_calc_stevens.F |
537 |
OBCS_CALC_STEVENS |
vZonBar = vZonBar + OBSvStevens(I,K,bi,bj) |
./pkg/obcs/obcs_calc_stevens.F |
547 |
OBCS_CALC_STEVENS |
vZonPri(K) = (OBSvStevens(I,K,bi,bj)-vZonBar) |
./pkg/obcs/obcs_init_variables.F |
105 |
OBCS_INIT_VARIABLES |
OBSvStevens(i,k,bi,bj)=0. _d 0 |
./pkg/obcs/obcs_read_pickup.F |
237 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,OBSvStevens, 1,myIter,myThid) |
./pkg/obcs/obcs_save_uv_n.F |
87 |
OBCS_SAVE_UV_N |
OBSvStevens(i,k,bi,bj) = vFld(i,Jobc+1,k,bi,bj) |
./pkg/obcs/obcs_write_pickup.F |
221 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,OBSvStevens, 1,myIter,myThid) |