MFIX  2016-1
get_flow_bc.f
Go to the documentation of this file.
1 !vvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvvC
2 ! C
3 ! Subroutine: GET_FLOW_BC C
4 ! Purpose: Find and validate i, j, k locations for flow BC's. Also C
5 ! set value of bc_plane for flow BC's. C
6 ! C
7 ! Author: P. Nicoletti Date: 10-DEC-91 C
8 ! Reviewer: M.SYAMLAL, W.ROGERS, P.NICOLETTI Date: 27-JAN-92 C
9 ! C
10 ! Revision Number: C
11 ! Purpose: C
12 ! Author: Date: dd-mmm-yy C
13 ! Reviewer: Date: dd-mmm-yy C
14 ! C
15 ! Literature/Document References: C
16 ! C
17 ! Variables referenced: BC_DEFINED, BC_X_w, BC_X_e, BC_Y_s, BC_Y_n C
18 ! BC_Z_b, BC_Z_t, DX, DY, DZ, IMAX, JMAX, KMAX C
19 ! C
20 ! Variables modified: BC_I_w, BC_I_e, BC_J_s, BC_J_n, BC_K_b, BC_K_t C
21 ! ICBC_FLAG, BC_PLANE C
22 ! C
23 ! Local variables: BC, I, J, K, IJK, I_w, I_e, J_s, J_n, K_b, K_t C
24 ! ERROR, X_CONSTANT, Y_CONSTANT, Z_CONSTANT C
25 ! C
26 !^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^C
27  SUBROUTINE get_flow_bc
28 
29  IMPLICIT NONE
30 
31 
32 ! Stub file: TBR/JM
33 
34  RETURN
35  END SUBROUTINE get_flow_bc
36 
get_flow_bc
subroutine get_flow_bc
Definition: get_flow_bc.f:28