File |
Line number |
Procedure |
Code |
./pkg/obcs/OBCS_FIELDS.h |
39 |
NO PROCEDURE |
& OBNu,OBNv,OBNt,OBNs |
./pkg/obcs/OBCS_FIELDS.h |
41 |
NO PROCEDURE |
_RL OBNv (1-Olx:sNx+Olx,Nr,nSx,nSy) |
./pkg/obcs/obcs_add_tides.F |
105 |
OBCS_ADD_TIDES |
OBNv(i,k,bi,bj) = OBNv(i,k,bi,bj) + |
./pkg/obcs/obcs_apply_uv.F |
151 |
OBCS_APPLY_UV |
vFld(i,Jobc,k,bi,bj) = OBNv(i,k,bi,bj) |
./pkg/obcs/obcs_apply_uv.F |
153 |
OBCS_APPLY_UV |
vFld(i,Jobc+1,k,bi,bj) = OBNv(i,k,bi,bj) |
./pkg/obcs/obcs_balance_flow.F |
202 |
OBCS_BALANCE_FLOW |
tileFlow(bi,bj) = tileFlow(bi,bj) + tmpA*OBNv(i,k,bi,bj) |
./pkg/obcs/obcs_balance_flow.F |
367 |
OBCS_BALANCE_FLOW |
OBNv(i,k,bi,bj) = OBNv(i,k,bi,bj) |
./pkg/obcs/obcs_calc.F |
203 |
OBCS_CALC |
OBNv(i,k,bi,bj)=0. |
./pkg/obcs/obcs_calc_stevens.F |
443 |
OBCS_CALC_STEVENS |
vZonBar = vZonBar + OBNv(I,K,bi,bj) |
./pkg/obcs/obcs_calc_stevens.F |
451 |
OBCS_CALC_STEVENS |
OBNv(I,K,bi,bj) = (vZonBar + vZonPri(K)) |
./pkg/obcs/obcs_exf_load.F |
61 |
OBCS_EXF_LOAD |
U OBNv, OBNv0, OBNv1, OBNvfile, |
./pkg/obcs/obcs_fields_load.F |
569 |
OBCS_FIELDS_LOAD |
& OBNv, OBNv0, OBNv1, aWght, bWght, myThid ) |
./pkg/obcs/obcs_init_variables.F |
69 |
OBCS_INIT_VARIABLES |
OBNv(i,k,bi,bj)=0. _d 0 |
./pkg/obcs/obcs_output.F |
108 |
OBCS_OUTPUT |
CALL WRITE_REC_XZ_RL(fn,prec,Nr,OBNv,2,myIter,myThid) |
./pkg/obcs/obcs_output.F |
61 |
OBCS_OUTPUT |
CALL PLOT_FIELD_XZRL( OBNv, 'OBNv' , Nr, myIter, myThid ) |
./pkg/obcs/obcs_sponge.F |
263 |
OBCS_SPONGE_V |
vrelax= OBNv(i,k,bi,bj) |
./pkg/obcs/obcs_sponge.F |
266 |
OBCS_SPONGE_V |
& float(spongeThickness-jsl)*OBNv(i,k,bi,bj) |
./pkg/obcs/orlanski_north.F |
137 |
ORLANSKI_NORTH |
OBNv(I,K,bi,bj)=vVel(I,J_obc,K,bi,bj)- |
./verification/dome/code/obcs_calc.F |
179 |
OBCS_CALC |
OBNv(I,K,bi,bj)=0. |
./verification/internal_wave/code/obcs_calc.F |
168 |
OBCS_CALC |
OBNv(I,K,bi,bj)=0. |
./pkg/autodiff/autodiff_restore.F |
320 |
AUTODIFF_RESTORE |
OBNv(I,K,bi,bj) = StoreOBCSN(I,K,bi,bj,2) |
./pkg/autodiff/autodiff_store.F |
390 |
AUTODIFF_STORE |
StoreOBCSN(I,K,bi,bj,2) = OBNv(I,K,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
281 |
CTRL_GETOBCSN |
OBNv(i,k,bi,bj) = OBNv (i,k,bi,bj) |
./pkg/ctrl/ctrl_getobcsn.F |
284 |
CTRL_GETOBCSN |
OBNv(i,k,bi,bj) = OBNv(i,k,bi,bj) |