File |
Line number |
Procedure |
Code |
./pkg/exf/exf_set_obcs.F |
109 |
EXF_SET_OBCS_XZ |
& (exf_one - fac) * obcs_xz_1(i,k,bi,bj) |
./pkg/exf/exf_set_obcs.F |
16 |
EXF_SET_OBCS_XZ |
U obcs_fld_xz, obcs_xz_0, obcs_xz_1, |
./pkg/exf/exf_set_obcs.F |
49 |
EXF_SET_OBCS_XZ |
_RL obcs_xz_1(1-OLx:sNx+OLx,nNz,nSx,nSy) |
./pkg/exf/exf_set_obcs.F |
84 |
EXF_SET_OBCS_XZ |
& obcs_xz_1, count0, myIter, myThid ) |
./pkg/exf/exf_set_obcs.F |
89 |
EXF_SET_OBCS_XZ |
CALL EXF_SWAPFFIELDS_XZ( obcs_xz_0, obcs_xz_1, nNz,myThid ) |
./pkg/exf/exf_set_obcs.F |
99 |
EXF_SET_OBCS_XZ |
& obcs_xz_1, count1, myIter, myThid ) |