File |
Line number |
Procedure |
Code |
./pkg/exf/exf_set_obcs.F |
37 |
EXF_SET_OBCS_XZ |
_RL obcs_xz_1(1-olx:snx+olx,Nr,nsx,nsy) |
./pkg/exf/exf_set_obcs.F |
4 |
EXF_SET_OBCS_XZ |
& obcs_fld_xz, obcs_xz_0, obcs_xz_1 |
./pkg/exf/exf_set_obcs.F |
61 |
EXF_SET_OBCS_XZ |
& , obcs_xz_1, count0, mythid |
./pkg/exf/exf_set_obcs.F |
66 |
EXF_SET_OBCS_XZ |
call EXF_SWAPFFIELDS_XZ( obcs_xz_0, obcs_xz_1, mythid ) |
./pkg/exf/exf_set_obcs.F |
69 |
EXF_SET_OBCS_XZ |
& , obcs_xz_1, count1, mythid |
./pkg/exf/exf_set_obcs.F |
79 |
EXF_SET_OBCS_XZ |
& (exf_one - fac) * obcs_xz_1(i,k,bi,bj) |