xref: /phasta/phSolver/common/mod_BCsfIDmap.f (revision 712d3df0b59ebebaaeaea358162c8d2c043c6e08) 
1*10167291SKenneth E. Jansen          module BCsfIDmap
2*10167291SKenneth E. Jansen              integer ninlet
3*10167291SKenneth E. Jansen              integer, allocatable, dimension(:) :: inlf
4*10167291SKenneth E. Jansen              real*8, allocatable, dimension(:,:) :: prof_inlet ! profile for inlet velocity
5*10167291SKenneth E. Jansen              integer noutlet
6*10167291SKenneth E. Jansen              integer, allocatable, dimension(:) :: outf
7*10167291SKenneth E. Jansen          end module
8*10167291SKenneth E. Jansen
9