MODFLOW 6  version 6.7.0.dev1
USGS Modular Hydrologic Model
Private Member Functions | List of all members
memorymanagermodule::mem_setptr Interface Reference
Collaboration diagram for memorymanagermodule::mem_setptr:
Collaboration graph

Private Member Functions

subroutine setptr_logical (sclr, name, mem_path)
 Set pointer to a logical scalar. More...
 
subroutine setptr_int (sclr, name, mem_path)
 Set pointer to integer scalar. More...
 
subroutine setptr_int1d (aint, name, mem_path)
 Set pointer to 1d integer array. More...
 
subroutine setptr_int2d (aint, name, mem_path)
 Set pointer to 2d integer array. More...
 
subroutine setptr_int3d (aint, name, mem_path)
 Set pointer to 3d integer array. More...
 
subroutine setptr_dbl (sclr, name, mem_path)
 Set pointer to a real scalar. More...
 
subroutine setptr_dbl1d (adbl, name, mem_path)
 Set pointer to a 1d real array. More...
 
subroutine setptr_dbl2d (adbl, name, mem_path)
 Set pointer to a 2d real array. More...
 
subroutine setptr_dbl3d (adbl, name, mem_path)
 Set pointer to a 3d real array. More...
 
subroutine setptr_str (asrt, name, mem_path)
 Set pointer to a string (scalar) More...
 
subroutine setptr_str1d (astr1d, name, mem_path)
 Set pointer to a fixed-length string array. More...
 
subroutine setptr_charstr1d (acharstr1d, name, mem_path)
 Set pointer to an array of CharacterStringType. More...
 

Detailed Description

Definition at line 89 of file MemoryManager.f90.

Member Function/Subroutine Documentation

◆ setptr_charstr1d()

subroutine memorymanagermodule::mem_setptr::setptr_charstr1d ( type(characterstringtype), dimension(:), intent(inout), pointer, contiguous  acharstr1d,
character(len=*), intent(in)  name,
character(len=*), intent(in)  mem_path 
)
private
Parameters
[in,out]acharstr1dthe reallocated charstring array
[in]namevariable name
[in]mem_pathpath where variable is stored

Definition at line 1608 of file MemoryManager.f90.

1609  type(CharacterStringType), dimension(:), pointer, contiguous, &
1610  intent(inout) :: acharstr1d !< the reallocated charstring array
1611  character(len=*), intent(in) :: name !< variable name
1612  character(len=*), intent(in) :: mem_path !< path where variable is stored
1613  ! -- local
1614  type(MemoryType), pointer :: mt
1615  logical(LGP) :: found
1616  ! -- code
1617  call get_from_memorystore(name, mem_path, mt, found)
1618  acharstr1d => mt%acharstr1d
Here is the call graph for this function:

◆ setptr_dbl()

subroutine memorymanagermodule::mem_setptr::setptr_dbl ( real(dp), intent(inout), pointer  sclr,
character(len=*), intent(in)  name,
character(len=*), intent(in)  mem_path 
)
private
Parameters
[in,out]sclrpointer to a real scalar
[in]namevariable name
[in]mem_pathpath where variable is stored

Definition at line 1518 of file MemoryManager.f90.

1519  real(DP), pointer, intent(inout) :: sclr !< pointer to a real scalar
1520  character(len=*), intent(in) :: name !< variable name
1521  character(len=*), intent(in) :: mem_path !< path where variable is stored
1522  ! -- local
1523  type(MemoryType), pointer :: mt
1524  logical(LGP) :: found
1525  ! -- code
1526  call get_from_memorystore(name, mem_path, mt, found)
1527  sclr => mt%dblsclr
Here is the call graph for this function:

◆ setptr_dbl1d()

subroutine memorymanagermodule::mem_setptr::setptr_dbl1d ( real(dp), dimension(:), intent(inout), pointer, contiguous  adbl,
character(len=*), intent(in)  name,
character(len=*), intent(in)  mem_path 
)
private
Parameters
[in,out]adblpointer to 1d real array
[in]namevariable name
[in]mem_pathpath where variable is stored

Definition at line 1532 of file MemoryManager.f90.

1533  real(DP), dimension(:), pointer, contiguous, intent(inout) :: adbl !< pointer to 1d real array
1534  character(len=*), intent(in) :: name !< variable name
1535  character(len=*), intent(in) :: mem_path !< path where variable is stored
1536  ! -- local
1537  type(MemoryType), pointer :: mt
1538  logical(LGP) :: found
1539  ! -- code
1540  call get_from_memorystore(name, mem_path, mt, found)
1541  adbl => mt%adbl1d
Here is the call graph for this function:

◆ setptr_dbl2d()

subroutine memorymanagermodule::mem_setptr::setptr_dbl2d ( real(dp), dimension(:, :), intent(inout), pointer, contiguous  adbl,
character(len=*), intent(in)  name,
character(len=*), intent(in)  mem_path 
)
private
Parameters
[in,out]adblpointer to 2d real array
[in]namevariable name
[in]mem_pathpath where variable is stored

Definition at line 1546 of file MemoryManager.f90.

1547  real(DP), dimension(:, :), pointer, contiguous, intent(inout) :: adbl !< pointer to 2d real array
1548  character(len=*), intent(in) :: name !< variable name
1549  character(len=*), intent(in) :: mem_path !< path where variable is stored
1550  ! -- local
1551  type(MemoryType), pointer :: mt
1552  logical(LGP) :: found
1553  ! -- code
1554  call get_from_memorystore(name, mem_path, mt, found)
1555  adbl => mt%adbl2d
Here is the call graph for this function:

◆ setptr_dbl3d()

subroutine memorymanagermodule::mem_setptr::setptr_dbl3d ( real(dp), dimension(:, :, :), intent(inout), pointer, contiguous  adbl,
character(len=*), intent(in)  name,
character(len=*), intent(in)  mem_path 
)
private
Parameters
[in,out]adblpointer to 3d real array
[in]namevariable name
[in]mem_pathpath where variable is stored

Definition at line 1560 of file MemoryManager.f90.

1561  real(DP), dimension(:, :, :), pointer, contiguous, intent(inout) :: adbl !< pointer to 3d real array
1562  character(len=*), intent(in) :: name !< variable name
1563  character(len=*), intent(in) :: mem_path !< path where variable is stored
1564  ! -- local
1565  type(MemoryType), pointer :: mt
1566  logical(LGP) :: found
1567  ! -- code
1568  call get_from_memorystore(name, mem_path, mt, found)
1569  adbl => mt%adbl3d
Here is the call graph for this function:

◆ setptr_int()

subroutine memorymanagermodule::mem_setptr::setptr_int ( integer(i4b), intent(inout), pointer  sclr,
character(len=*), intent(in)  name,
character(len=*), intent(in)  mem_path 
)
private
Parameters
[in,out]sclrpointer to integer scalar
[in]namevariable name
[in]mem_pathpath where variable is stored

Definition at line 1462 of file MemoryManager.f90.

1463  integer(I4B), pointer, intent(inout) :: sclr !< pointer to integer scalar
1464  character(len=*), intent(in) :: name !< variable name
1465  character(len=*), intent(in) :: mem_path !< path where variable is stored
1466  ! -- local
1467  type(MemoryType), pointer :: mt
1468  logical(LGP) :: found
1469  ! -- code
1470  call get_from_memorystore(name, mem_path, mt, found)
1471  sclr => mt%intsclr
Here is the call graph for this function:

◆ setptr_int1d()

subroutine memorymanagermodule::mem_setptr::setptr_int1d ( integer(i4b), dimension(:), intent(inout), pointer, contiguous  aint,
character(len=*), intent(in)  name,
character(len=*), intent(in)  mem_path 
)
private
Parameters
[in,out]aintpointer to 1d integer array
[in]namevariable name
[in]mem_pathpath where variable is stored

Definition at line 1476 of file MemoryManager.f90.

1477  integer(I4B), dimension(:), pointer, contiguous, intent(inout) :: aint !< pointer to 1d integer array
1478  character(len=*), intent(in) :: name !< variable name
1479  character(len=*), intent(in) :: mem_path !< path where variable is stored
1480  ! -- local
1481  type(MemoryType), pointer :: mt
1482  logical(LGP) :: found
1483  ! -- code
1484  call get_from_memorystore(name, mem_path, mt, found)
1485  aint => mt%aint1d
Here is the call graph for this function:

◆ setptr_int2d()

subroutine memorymanagermodule::mem_setptr::setptr_int2d ( integer(i4b), dimension(:, :), intent(inout), pointer, contiguous  aint,
character(len=*), intent(in)  name,
character(len=*), intent(in)  mem_path 
)
private
Parameters
[in,out]aintpointer to 2d integer array
[in]namevariable name
[in]mem_pathpath where variable is stored

Definition at line 1490 of file MemoryManager.f90.

1491  integer(I4B), dimension(:, :), pointer, contiguous, intent(inout) :: aint !< pointer to 2d integer array
1492  character(len=*), intent(in) :: name !< variable name
1493  character(len=*), intent(in) :: mem_path !< path where variable is stored
1494  ! -- local
1495  type(MemoryType), pointer :: mt
1496  logical(LGP) :: found
1497  ! -- code
1498  call get_from_memorystore(name, mem_path, mt, found)
1499  aint => mt%aint2d
Here is the call graph for this function:

◆ setptr_int3d()

subroutine memorymanagermodule::mem_setptr::setptr_int3d ( integer(i4b), dimension(:, :, :), intent(inout), pointer, contiguous  aint,
character(len=*), intent(in)  name,
character(len=*), intent(in)  mem_path 
)
private
Parameters
[in,out]aintpointer to 3d integer array
[in]namevariable name
[in]mem_pathpath where variable is stored

Definition at line 1504 of file MemoryManager.f90.

1505  integer(I4B), dimension(:, :, :), pointer, contiguous, intent(inout) :: aint !< pointer to 3d integer array
1506  character(len=*), intent(in) :: name !< variable name
1507  character(len=*), intent(in) :: mem_path !< path where variable is stored
1508  ! -- local
1509  type(MemoryType), pointer :: mt
1510  logical(LGP) :: found
1511  ! -- code
1512  call get_from_memorystore(name, mem_path, mt, found)
1513  aint => mt%aint3d
Here is the call graph for this function:

◆ setptr_logical()

subroutine memorymanagermodule::mem_setptr::setptr_logical ( logical(lgp), intent(inout), pointer  sclr,
character(len=*), intent(in)  name,
character(len=*), intent(in)  mem_path 
)
private
Parameters
[in,out]sclrpointer to logical scalar
[in]namevariable name
[in]mem_pathpath where variable is stored

Definition at line 1448 of file MemoryManager.f90.

1449  logical(LGP), pointer, intent(inout) :: sclr !< pointer to logical scalar
1450  character(len=*), intent(in) :: name !< variable name
1451  character(len=*), intent(in) :: mem_path !< path where variable is stored
1452  ! -- local
1453  type(MemoryType), pointer :: mt
1454  logical(LGP) :: found
1455  ! -- code
1456  call get_from_memorystore(name, mem_path, mt, found)
1457  sclr => mt%logicalsclr
Here is the call graph for this function:

◆ setptr_str()

subroutine memorymanagermodule::mem_setptr::setptr_str ( character(len=:), pointer  asrt,
character(len=*), intent(in)  name,
character(len=*), intent(in)  mem_path 
)
private
Parameters
asrtpointer to the character string
[in]namevariable name
[in]mem_pathpath where variable is stored

Definition at line 1574 of file MemoryManager.f90.

1575  character(len=:), pointer :: asrt !< pointer to the character string
1576  character(len=*), intent(in) :: name !< variable name
1577  character(len=*), intent(in) :: mem_path !< path where variable is stored
1578  ! -- local
1579  type(MemoryType), pointer :: mt
1580  logical(LGP) :: found
1581  ! -- code
1582  call get_from_memorystore(name, mem_path, mt, found)
1583  asrt => mt%strsclr
Here is the call graph for this function:

◆ setptr_str1d()

subroutine memorymanagermodule::mem_setptr::setptr_str1d ( character(len=:), dimension(:), intent(inout), pointer, contiguous  astr1d,
character(len=*), intent(in)  name,
character(len=*), intent(in)  mem_path 
)
private
Parameters
[in,out]astr1dpointer to the string array
[in]namevariable name
[in]mem_pathpath where variable is stored

Definition at line 1588 of file MemoryManager.f90.

1589  character(len=:), dimension(:), &
1590  pointer, contiguous, intent(inout) :: astr1d !< pointer to the string array
1591  character(len=*), intent(in) :: name !< variable name
1592  character(len=*), intent(in) :: mem_path !< path where variable is stored
1593  ! -- local
1594  type(MemoryType), pointer :: mt
1595  logical(LGP) :: found
1596  ! -- code
1597  call get_from_memorystore(name, mem_path, mt, found)
1598  select type (item => mt%astr1d)
1599  type is (character(*))
1600  astr1d => item
1601  class default
1602  astr1d => null()
1603  end select
Here is the call graph for this function:
The documentation for this interface was generated from the following file: