MODFLOW 6  version 6.7.0.dev0
USGS Modular Hydrologic Model
Private Member Functions | Private Attributes | List of all members
gwfhfbmodule::gwfhfbtype Type Reference
Inheritance diagram for gwfhfbmodule::gwfhfbtype:
Inheritance graph
Collaboration diagram for gwfhfbmodule::gwfhfbtype:
Collaboration graph

Private Member Functions

procedure hfb_ar
 
procedure hfb_rp
 
procedure hfb_fc
 
procedure hfb_cq
 
procedure hfb_da
 
procedure allocate_scalars
 
procedure, private allocate_arrays
 
procedure, private read_options
 
procedure, private read_dimensions
 
procedure, private read_data
 
procedure, private check_data
 
procedure, private condsat_reset
 
procedure, private condsat_modify
 
procedure set_names
 
procedure da
 
procedure read_check_ionper
 
procedure get_block_data
 

Private Attributes

type(gwfvsctype), pointer vsc => null()
 viscosity object More...
 
integer(i4b), pointer maxhfb => null()
 max number of hfb's More...
 
integer(i4b), pointer nhfb => null()
 number of hfb's More...
 
integer(i4b), dimension(:), pointer, contiguous noden => null()
 first cell More...
 
integer(i4b), dimension(:), pointer, contiguous nodem => null()
 second cell More...
 
integer(i4b), dimension(:), pointer, contiguous idxloc => null()
 position in model ja More...
 
real(dp), dimension(:), pointer, contiguous hydchr => null()
 hydraulic characteristic of the barrier More...
 
real(dp), dimension(:), pointer, contiguous csatsav => null()
 value of condsat prior to hfb modification More...
 
real(dp), dimension(:), pointer, contiguous condsav => null()
 saved conductance of combined npf and hfb More...
 
type(xt3dtype), pointer xt3d => null()
 pointer to xt3d object More...
 
integer(i4b), dimension(:), pointer, contiguous ibound => null()
 pointer to model ibound More...
 
integer(i4b), dimension(:), pointer, contiguous icelltype => null()
 pointer to model icelltype More...
 
integer(i4b), dimension(:), pointer, contiguous ihc => null()
 pointer to model ihc More...
 
integer(i4b), dimension(:), pointer, contiguous ia => null()
 pointer to model ia More...
 
integer(i4b), dimension(:), pointer, contiguous ja => null()
 pointer to model ja More...
 
integer(i4b), dimension(:), pointer, contiguous jas => null()
 pointer to model jas More...
 
integer(i4b), dimension(:), pointer, contiguous isym => null()
 pointer to model isym More...
 
real(dp), dimension(:), pointer, contiguous condsat => null()
 pointer to model condsat More...
 
real(dp), dimension(:), pointer, contiguous top => null()
 pointer to model top More...
 
real(dp), dimension(:), pointer, contiguous bot => null()
 pointer to model bot More...
 
real(dp), dimension(:), pointer, contiguous hwva => null()
 pointer to model hwva More...
 
real(dp), dimension(:), pointer, contiguous hnew => null()
 pointer to model xnew More...
 
integer(i4b), pointer ivsc => null()
 flag indicating if viscosity is active in the model More...
 
character(len=lenmodelname) name_model = ''
 the name of the model that contains this package More...
 
character(len=lenpackagename) packname = ''
 name of the package More...
 
character(len=lenmempath) memorypath = ''
 the location in the memory manager where the variables are stored More...
 
character(len=lenmempath) memorypathmodel = ''
 the location in the memory manager where the variables of the parent model are stored More...
 
character(len=lenmempath) input_mempath = ''
 input context mempath More...
 
character(len=linelength), pointer input_fname => null()
 input file name More...
 
character(len=lenftype) filtyp = ''
 file type (CHD, DRN, RIV, etc.) More...
 
character(len=lenftype), pointer package_type => null()
 package type (same as filtyp) stored in memory manager More...
 
integer(i4b), pointer id => null()
 consecutive package number in model More...
 
integer(i4b), pointer inunit => null()
 unit number for input file More...
 
integer(i4b), pointer iout => null()
 unit number for writing package output More...
 
integer(i4b), pointer inewton => null()
 newton flag More...
 
integer(i4b), pointer iasym => null()
 package causes matrix asymmetry More...
 
integer(i4b), pointer iprpak => null()
 integer flag to echo input More...
 
integer(i4b), pointer iprflow => null()
 flag to print simulated flows More...
 
integer(i4b), pointer ipakcb => null()
 output flows (-1, 0, 1) - save_flows More...
 
integer(i4b), pointer ionper => null()
 stress period for next data More...
 
integer(i4b), pointer lastonper => null()
 last value of ionper (for checking) More...
 
type(blockparsertype) parser
 parser object for reading blocks of information More...
 
class(disbasetype), pointer dis => null()
 model discretization object More...
 

Detailed Description

Definition at line 18 of file gwf-hfb.f90.

Member Function/Subroutine Documentation

◆ allocate_arrays()

procedure, private gwfhfbmodule::gwfhfbtype::allocate_arrays
private

Definition at line 55 of file gwf-hfb.f90.

◆ allocate_scalars()

procedure gwfhfbmodule::gwfhfbtype::allocate_scalars
private

Definition at line 54 of file gwf-hfb.f90.

◆ check_data()

procedure, private gwfhfbmodule::gwfhfbtype::check_data
private

Definition at line 59 of file gwf-hfb.f90.

◆ condsat_modify()

procedure, private gwfhfbmodule::gwfhfbtype::condsat_modify
private

Definition at line 61 of file gwf-hfb.f90.

◆ condsat_reset()

procedure, private gwfhfbmodule::gwfhfbtype::condsat_reset
private

Definition at line 60 of file gwf-hfb.f90.

◆ da()

procedure numericalpackagemodule::numericalpackagetype::da
privateinherited

Definition at line 55 of file NumericalPackage.f90.

◆ get_block_data()

procedure numericalpackagemodule::numericalpackagetype::get_block_data
privateinherited

Definition at line 57 of file NumericalPackage.f90.

◆ hfb_ar()

procedure gwfhfbmodule::gwfhfbtype::hfb_ar
private

Definition at line 49 of file gwf-hfb.f90.

◆ hfb_cq()

procedure gwfhfbmodule::gwfhfbtype::hfb_cq
private

Definition at line 52 of file gwf-hfb.f90.

◆ hfb_da()

procedure gwfhfbmodule::gwfhfbtype::hfb_da
private

Definition at line 53 of file gwf-hfb.f90.

◆ hfb_fc()

procedure gwfhfbmodule::gwfhfbtype::hfb_fc
private

Definition at line 51 of file gwf-hfb.f90.

◆ hfb_rp()

procedure gwfhfbmodule::gwfhfbtype::hfb_rp
private

Definition at line 50 of file gwf-hfb.f90.

◆ read_check_ionper()

procedure numericalpackagemodule::numericalpackagetype::read_check_ionper
privateinherited

Definition at line 56 of file NumericalPackage.f90.

◆ read_data()

procedure, private gwfhfbmodule::gwfhfbtype::read_data
private

Definition at line 58 of file gwf-hfb.f90.

◆ read_dimensions()

procedure, private gwfhfbmodule::gwfhfbtype::read_dimensions
private

Definition at line 57 of file gwf-hfb.f90.

◆ read_options()

procedure, private gwfhfbmodule::gwfhfbtype::read_options
private

Definition at line 56 of file gwf-hfb.f90.

◆ set_names()

procedure numericalpackagemodule::numericalpackagetype::set_names
privateinherited

Definition at line 53 of file NumericalPackage.f90.

Member Data Documentation

◆ bot

real(dp), dimension(:), pointer, contiguous gwfhfbmodule::gwfhfbtype::bot => null()
private

Definition at line 40 of file gwf-hfb.f90.

40  real(DP), dimension(:), pointer, contiguous :: bot => null() !< pointer to model bot

◆ condsat

real(dp), dimension(:), pointer, contiguous gwfhfbmodule::gwfhfbtype::condsat => null()
private

Definition at line 38 of file gwf-hfb.f90.

38  real(DP), dimension(:), pointer, contiguous :: condsat => null() !< pointer to model condsat

◆ condsav

real(dp), dimension(:), pointer, contiguous gwfhfbmodule::gwfhfbtype::condsav => null()
private

Definition at line 28 of file gwf-hfb.f90.

28  real(DP), dimension(:), pointer, contiguous :: condsav => null() !< saved conductance of combined npf and hfb

◆ csatsav

real(dp), dimension(:), pointer, contiguous gwfhfbmodule::gwfhfbtype::csatsav => null()
private

Definition at line 27 of file gwf-hfb.f90.

27  real(DP), dimension(:), pointer, contiguous :: csatsav => null() !< value of condsat prior to hfb modification

◆ dis

class(disbasetype), pointer numericalpackagemodule::numericalpackagetype::dis => null()
privateinherited

Definition at line 50 of file NumericalPackage.f90.

50  class(DisBaseType), pointer :: dis => null() !< model discretization object

◆ filtyp

character(len=lenftype) numericalpackagemodule::numericalpackagetype::filtyp = ''
privateinherited

Definition at line 33 of file NumericalPackage.f90.

33  character(len=LENFTYPE) :: filtyp = '' !< file type (CHD, DRN, RIV, etc.)

◆ hnew

real(dp), dimension(:), pointer, contiguous gwfhfbmodule::gwfhfbtype::hnew => null()
private

Definition at line 42 of file gwf-hfb.f90.

42  real(DP), dimension(:), pointer, contiguous :: hnew => null() !< pointer to model xnew

◆ hwva

real(dp), dimension(:), pointer, contiguous gwfhfbmodule::gwfhfbtype::hwva => null()
private

Definition at line 41 of file gwf-hfb.f90.

41  real(DP), dimension(:), pointer, contiguous :: hwva => null() !< pointer to model hwva

◆ hydchr

real(dp), dimension(:), pointer, contiguous gwfhfbmodule::gwfhfbtype::hydchr => null()
private

Definition at line 26 of file gwf-hfb.f90.

26  real(DP), dimension(:), pointer, contiguous :: hydchr => null() !< hydraulic characteristic of the barrier

◆ ia

integer(i4b), dimension(:), pointer, contiguous gwfhfbmodule::gwfhfbtype::ia => null()
private

Definition at line 34 of file gwf-hfb.f90.

34  integer(I4B), dimension(:), pointer, contiguous :: ia => null() !< pointer to model ia

◆ iasym

integer(i4b), pointer numericalpackagemodule::numericalpackagetype::iasym => null()
privateinherited

Definition at line 41 of file NumericalPackage.f90.

41  integer(I4B), pointer :: iasym => null() !< package causes matrix asymmetry

◆ ibound

integer(i4b), dimension(:), pointer, contiguous gwfhfbmodule::gwfhfbtype::ibound => null()
private

Definition at line 31 of file gwf-hfb.f90.

31  integer(I4B), dimension(:), pointer, contiguous :: ibound => null() !< pointer to model ibound

◆ icelltype

integer(i4b), dimension(:), pointer, contiguous gwfhfbmodule::gwfhfbtype::icelltype => null()
private

Definition at line 32 of file gwf-hfb.f90.

32  integer(I4B), dimension(:), pointer, contiguous :: icelltype => null() !< pointer to model icelltype

◆ id

integer(i4b), pointer numericalpackagemodule::numericalpackagetype::id => null()
privateinherited

Definition at line 37 of file NumericalPackage.f90.

37  integer(I4B), pointer :: id => null() !< consecutive package number in model

◆ idxloc

integer(i4b), dimension(:), pointer, contiguous gwfhfbmodule::gwfhfbtype::idxloc => null()
private

Definition at line 25 of file gwf-hfb.f90.

25  integer(I4B), dimension(:), pointer, contiguous :: idxloc => null() !< position in model ja

◆ ihc

integer(i4b), dimension(:), pointer, contiguous gwfhfbmodule::gwfhfbtype::ihc => null()
private

Definition at line 33 of file gwf-hfb.f90.

33  integer(I4B), dimension(:), pointer, contiguous :: ihc => null() !< pointer to model ihc

◆ inewton

integer(i4b), pointer numericalpackagemodule::numericalpackagetype::inewton => null()
privateinherited

Definition at line 40 of file NumericalPackage.f90.

40  integer(I4B), pointer :: inewton => null() !< newton flag

◆ input_fname

character(len=linelength), pointer numericalpackagemodule::numericalpackagetype::input_fname => null()
privateinherited

Definition at line 32 of file NumericalPackage.f90.

32  character(len=LINELENGTH), pointer :: input_fname => null() !< input file name

◆ input_mempath

character(len=lenmempath) numericalpackagemodule::numericalpackagetype::input_mempath = ''
privateinherited

Definition at line 31 of file NumericalPackage.f90.

31  character(len=LENMEMPATH) :: input_mempath = '' !< input context mempath

◆ inunit

integer(i4b), pointer numericalpackagemodule::numericalpackagetype::inunit => null()
privateinherited

Definition at line 38 of file NumericalPackage.f90.

38  integer(I4B), pointer :: inunit => null() !< unit number for input file

◆ ionper

integer(i4b), pointer numericalpackagemodule::numericalpackagetype::ionper => null()
privateinherited

Definition at line 45 of file NumericalPackage.f90.

45  integer(I4B), pointer :: ionper => null() !< stress period for next data

◆ iout

integer(i4b), pointer numericalpackagemodule::numericalpackagetype::iout => null()
privateinherited

Definition at line 39 of file NumericalPackage.f90.

39  integer(I4B), pointer :: iout => null() !< unit number for writing package output

◆ ipakcb

integer(i4b), pointer numericalpackagemodule::numericalpackagetype::ipakcb => null()
privateinherited

Definition at line 44 of file NumericalPackage.f90.

44  integer(I4B), pointer :: ipakcb => null() !< output flows (-1, 0, 1) - save_flows

◆ iprflow

integer(i4b), pointer numericalpackagemodule::numericalpackagetype::iprflow => null()
privateinherited

Definition at line 43 of file NumericalPackage.f90.

43  integer(I4B), pointer :: iprflow => null() !< flag to print simulated flows

◆ iprpak

integer(i4b), pointer numericalpackagemodule::numericalpackagetype::iprpak => null()
privateinherited

Definition at line 42 of file NumericalPackage.f90.

42  integer(I4B), pointer :: iprpak => null() !< integer flag to echo input

◆ isym

integer(i4b), dimension(:), pointer, contiguous gwfhfbmodule::gwfhfbtype::isym => null()
private

Definition at line 37 of file gwf-hfb.f90.

37  integer(I4B), dimension(:), pointer, contiguous :: isym => null() !< pointer to model isym

◆ ivsc

integer(i4b), pointer gwfhfbmodule::gwfhfbtype::ivsc => null()
private

Definition at line 45 of file gwf-hfb.f90.

45  integer(I4B), pointer :: ivsc => null() !< flag indicating if viscosity is active in the model

◆ ja

integer(i4b), dimension(:), pointer, contiguous gwfhfbmodule::gwfhfbtype::ja => null()
private

Definition at line 35 of file gwf-hfb.f90.

35  integer(I4B), dimension(:), pointer, contiguous :: ja => null() !< pointer to model ja

◆ jas

integer(i4b), dimension(:), pointer, contiguous gwfhfbmodule::gwfhfbtype::jas => null()
private

Definition at line 36 of file gwf-hfb.f90.

36  integer(I4B), dimension(:), pointer, contiguous :: jas => null() !< pointer to model jas

◆ lastonper

integer(i4b), pointer numericalpackagemodule::numericalpackagetype::lastonper => null()
privateinherited

Definition at line 46 of file NumericalPackage.f90.

46  integer(I4B), pointer :: lastonper => null() !< last value of ionper (for checking)

◆ maxhfb

integer(i4b), pointer gwfhfbmodule::gwfhfbtype::maxhfb => null()
private

Definition at line 21 of file gwf-hfb.f90.

21  integer(I4B), pointer :: maxhfb => null() !< max number of hfb's

◆ memorypath

character(len=lenmempath) numericalpackagemodule::numericalpackagetype::memorypath = ''
privateinherited

Definition at line 28 of file NumericalPackage.f90.

28  character(len=LENMEMPATH) :: memoryPath = '' !< the location in the memory manager where the variables are stored

◆ memorypathmodel

character(len=lenmempath) numericalpackagemodule::numericalpackagetype::memorypathmodel = ''
privateinherited

Definition at line 29 of file NumericalPackage.f90.

29  character(len=LENMEMPATH) :: memoryPathModel = '' !< the location in the memory manager where the variables

◆ name_model

character(len=lenmodelname) numericalpackagemodule::numericalpackagetype::name_model = ''
privateinherited

Definition at line 26 of file NumericalPackage.f90.

26  character(len=LENMODELNAME) :: name_model = '' !< the name of the model that contains this package

◆ nhfb

integer(i4b), pointer gwfhfbmodule::gwfhfbtype::nhfb => null()
private

Definition at line 22 of file gwf-hfb.f90.

22  integer(I4B), pointer :: nhfb => null() !< number of hfb's

◆ nodem

integer(i4b), dimension(:), pointer, contiguous gwfhfbmodule::gwfhfbtype::nodem => null()
private

Definition at line 24 of file gwf-hfb.f90.

24  integer(I4B), dimension(:), pointer, contiguous :: nodem => null() !< second cell

◆ noden

integer(i4b), dimension(:), pointer, contiguous gwfhfbmodule::gwfhfbtype::noden => null()
private

Definition at line 23 of file gwf-hfb.f90.

23  integer(I4B), dimension(:), pointer, contiguous :: noden => null() !< first cell

◆ package_type

character(len=lenftype), pointer numericalpackagemodule::numericalpackagetype::package_type => null()
privateinherited

Definition at line 34 of file NumericalPackage.f90.

34  character(len=LENFTYPE), pointer :: package_type => null() !< package type (same as filtyp) stored in memory manager

◆ packname

character(len=lenpackagename) numericalpackagemodule::numericalpackagetype::packname = ''
privateinherited

Definition at line 27 of file NumericalPackage.f90.

27  character(len=LENPACKAGENAME) :: packName = '' !< name of the package

◆ parser

type(blockparsertype) numericalpackagemodule::numericalpackagetype::parser
privateinherited

Definition at line 49 of file NumericalPackage.f90.

49  type(BlockParserType) :: parser !< parser object for reading blocks of information

◆ top

real(dp), dimension(:), pointer, contiguous gwfhfbmodule::gwfhfbtype::top => null()
private

Definition at line 39 of file gwf-hfb.f90.

39  real(DP), dimension(:), pointer, contiguous :: top => null() !< pointer to model top

◆ vsc

type(gwfvsctype), pointer gwfhfbmodule::gwfhfbtype::vsc => null()
private

Definition at line 20 of file gwf-hfb.f90.

20  type(GwfVscType), pointer :: vsc => null() !< viscosity object

◆ xt3d

type(xt3dtype), pointer gwfhfbmodule::gwfhfbtype::xt3d => null()
private

Definition at line 29 of file gwf-hfb.f90.

29  type(Xt3dType), pointer :: xt3d => null() !< pointer to xt3d object
The documentation for this type was generated from the following file: