| File |
Line number |
Procedure |
Code |
|
./pkg/obcs/OBCS_FIELDS.h |
197 |
NO PROCEDURE |
& OBNeta, OBSeta, OBEeta, OBWeta |
|
./pkg/obcs/OBCS_FIELDS.h |
199 |
NO PROCEDURE |
_RL OBSeta (1-Olx:sNx+Olx,nSx,nSy) |
|
./pkg/obcs/obcs_apply_eta.F |
67 |
OBCS_APPLY_ETA |
& etaFld(i,Jobc,bi,bj) = OBSeta(i,bi,bj) |
|
./pkg/obcs/obcs_apply_r_star.F |
90 |
OBCS_APPLY_R_STAR |
& + OBSeta( j,bi,bj) / (rSurfS(i,j,bi,bj)-rLowS(i,j,bi,bj)) |
|
./pkg/obcs/obcs_apply_surf_dr.F |
97 |
OBCS_APPLY_SURF_DR |
& + OBSeta(i,bi,bj)*recip_drF(ks) |
|
./pkg/obcs/obcs_calc.F |
245 |
OBCS_CALC |
OBSeta(i,bi,bj)=0. |
|
./pkg/obcs/obcs_calc_stevens.F |
578 |
OBCS_CALC_STEVENS |
OBSeta(I,bi,bj) = etaN(I,J+1,bi,bj) |
|
./pkg/obcs/obcs_exf_load.F |
91 |
OBCS_EXF_LOAD |
U OBSeta, OBSeta0, OBSeta1, OBSetafile, |
|
./pkg/obcs/obcs_fields_load.F |
609 |
OBCS_FIELDS_LOAD |
OBSeta(i,bi,bj) = bWght*OBSeta0(i,bi,bj) |
|
./pkg/obcs/obcs_init_variables.F |
187 |
OBCS_INIT_VARIABLES |
OBSeta (i,bi,bj) = 0. _d 0 |