File |
Line number |
Procedure |
Code |
./pkg/obcs/OBCS_FIELDS.h |
59 |
NO PROCEDURE |
& OBNvStevens, OBNtStevens, OBNsStevens |
./pkg/obcs/OBCS_FIELDS.h |
60 |
NO PROCEDURE |
_RL OBNvStevens (1-Olx:sNx+Olx,Nr,nSx,nSy) |
./pkg/obcs/obcs_calc_stevens.F |
425 |
OBCS_CALC_STEVENS |
vZonBar = vZonBar + OBNvStevens(I,K,bi,bj) |
./pkg/obcs/obcs_calc_stevens.F |
435 |
OBCS_CALC_STEVENS |
vZonPri(K) = (OBNvStevens(I,K,bi,bj)-vZonBar) |
./pkg/obcs/obcs_init_variables.F |
83 |
OBCS_INIT_VARIABLES |
OBNvStevens(i,k,bi,bj)=0. _d 0 |
./pkg/obcs/obcs_read_pickup.F |
228 |
OBCS_READ_PICKUP |
CALL READ_REC_XZ_RL(fn,prec,Nr,OBNvStevens, 1,myIter,myThid) |
./pkg/obcs/obcs_save_uv_n.F |
73 |
OBCS_SAVE_UV_N |
OBNvStevens(i,k,bi,bj) = vFld(i,Jobc,k,bi,bj) |
./pkg/obcs/obcs_write_pickup.F |
212 |
OBCS_WRITE_PICKUP |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,OBNvStevens, 1,myIter,myThid) |