MODULE bnddef
USE kindef
IMPLICIT NONE
SAVE
INTEGER, PARAMETER :: LIMBDY=200
INTEGER, PARAMETER :: LIMBDC=20
INTEGER (INT4) :: DYN_LIMBDY, DYN_LIMBDC
INTEGER (INT4) :: NUMBDY
INTEGER (INT4) :: IFLIMX, IFLIMY, IFLIMZ
INTEGER (INT4), DIMENSION(:), POINTER :: NBDTYP, IVB
REAL (REAL8), DIMENSION(:,:), POINTER :: RVB
CHARACTER (LEN=30), DIMENSION(:), POINTER :: NAMBDY
END MODULE bnddef
| LIMBDY | Initial maximum number of boundary conditions |
| LIMBDC | Initial maximum number of parameters stored for each boundary condition |
| DYN_LIMBDY | Maximum number of dynamically allocated boundary conditions when the number of boundary conditions exceeds the initial maximum LIMBDY |
| DYN_LIMBDC | Maximum number of dynamically allocated parameters for each boundary condition when the number of parameters exceeds the initial maximum LIMBDC |
| NUMBDY | Number of boundary conditions |
| NBDTYP | Boundary condition types |
| IVB | Material number for Euler Flow and Transmit boundaries |
| RVB | Boundary condition parameters |
| NAMBDY | Boundary condition names |