File |
Line number |
Procedure |
Code |
./pkg/exf/exf_set_obcs.F |
334 |
EXF_SET_OBCS_Y |
U obcs_fld_y, obcs_y_0, obcs_y_1, |
./pkg/exf/exf_set_obcs.F |
365 |
EXF_SET_OBCS_Y |
_RL obcs_y_1(1-OLy:sNy+OLy,nSx,nSy) |
./pkg/exf/exf_set_obcs.F |
399 |
EXF_SET_OBCS_Y |
& obcs_y_1, count0, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
403 |
EXF_SET_OBCS_Y |
CALL EXF_SWAPFFIELDS_YZ( obcs_y_0, obcs_y_1, 1,myThid ) |
./pkg/exf/exf_set_obcs.F |
412 |
EXF_SET_OBCS_Y |
& obcs_y_1, count1, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
420 |
EXF_SET_OBCS_Y |
& (exf_one - fac) *obcs_y_1(j,bi,bj) |