File |
Line number |
Procedure |
Code |
./pkg/obcs/OBCS.h |
342 |
NO PROCEDURE |
& OBNeta, OBSeta, OBEeta, OBWeta |
./pkg/obcs/OBCS.h |
346 |
NO PROCEDURE |
_RL OBWeta (1-Oly:sNy+Oly,nSx,nSy) |
./pkg/obcs/obcs_apply_eta.F |
79 |
OBCS_APPLY_ETA |
& etaFld(i_obc,j,bi,bj) = OBWeta(j,bi,bj) |
./pkg/obcs/obcs_apply_r_star.F |
80 |
OBCS_APPLY_R_STAR |
& + OBWeta(i,bi,bj) |
./pkg/obcs/obcs_apply_surf_dr.F |
77 |
OBCS_APPLY_SURF_DR |
hFactmp = OBWhFac0(j,bi,bj) + OBWeta(j,bi,bj)*recip_drF(ks) |
./pkg/obcs/obcs_calc.F |
155 |
OBCS_CALC |
OBWeta(j,bi,bj)= ETA_F1(j,1,1) |
./pkg/obcs/obcs_calc.F |
174 |
OBCS_CALC |
OBWeta(J,bi,bj)=0. |
./pkg/obcs/obcs_external_fields_load.F |
529 |
OBCS_EXTERNAL_FIELDS_LOAD |
OBWeta(j,bi,bj) = bWght*OBWeta0(j,bi,bj) |
./pkg/obcs/obcs_init_variables.F |
168 |
OBCS_INIT_VARIABLES |
OBWeta (J,bi,bj) = 0. _d 0 |
./pkg/obcs/obcs_prescribe_read.F |
139 |
OBCS_PRESCRIBE_READ |
U OBWeta, OBWeta0, OBWeta1, OBWetafile, |