loadcontextmodule::setptr Interface Reference

Collaboration diagram for loadcontextmodule::setptr:

Private Member Functions
subroutine	setptr_int (intptr, varname, mempath)
	set intptr to varname More...
subroutine	setptr_charstr1d (charstr1d, varname, mempath, strlen)
	set charstr1d pointer to varname More...
subroutine	setptr_auxvar (auxvar, mempath)
	set auxvar pointer More...

Detailed Description

Definition at line 50 of file LoadContext.f90.

Member Function/Subroutine Documentation

setptr_auxvar()

subroutine loadcontextmodule::setptr::setptr_auxvar ( real(dp), dimension(:, :), intent(inout), pointer, contiguous  auxvar, character(len=*), intent(in)  mempath  )

private

Definition at line 742 of file LoadContext.f90.

    use memorymanagermodule, only: mem_allocate, mem_setptr, get_isize
    real(DP), dimension(:, :), pointer, &
      contiguous, intent(inout) :: auxvar
    character(len=*), intent(in) :: mempath
    integer(I4B) :: isize
    call get_isize('AUXVAR', mempath, isize)
    if (isize > -1) then
      call mem_setptr(auxvar, 'AUXVAR', mempath)
    else
      call mem_allocate(auxvar, 0, 0, 'AUXVAR', mempath)
    end if

Here is the call graph for this function:

setptr_charstr1d()

subroutine loadcontextmodule::setptr::setptr_charstr1d ( type(characterstringtype), dimension(:), intent(inout), pointer, contiguous  charstr1d, character(len=*), intent(in)  varname, character(len=*), intent(in)  mempath, integer(i4b), intent(in)  strlen  )

private

Definition at line 723 of file LoadContext.f90.

    use memorymanagermodule, only: mem_allocate, mem_setptr, get_isize
    type(CharacterStringType), dimension(:), pointer, &
      contiguous, intent(inout) :: charstr1d
    character(len=*), intent(in) :: varname
    character(len=*), intent(in) :: mempath
    integer(I4B), intent(in) :: strlen
    integer(I4B) :: isize
    call get_isize(varname, mempath, isize)
    if (isize > -1) then
      call mem_setptr(charstr1d, varname, mempath)
    else
      call mem_allocate(charstr1d, strlen, 0, varname, mempath)
    end if

Here is the call graph for this function:

setptr_int()

subroutine loadcontextmodule::setptr::setptr_int ( integer(i4b), intent(inout), pointer  intptr, character(len=*), intent(in)  varname, character(len=*), intent(in)  mempath  )

private

Definition at line 706 of file LoadContext.f90.

    use memorymanagermodule, only: mem_allocate, mem_setptr, get_isize
    integer(I4B), pointer, intent(inout) :: intptr
    character(len=*), intent(in) :: varname
    character(len=*), intent(in) :: mempath
    integer(I4B) :: isize
    call get_isize(varname, mempath, isize)
    if (isize > -1) then
      call mem_setptr(intptr, varname, mempath)
    else
      call mem_allocate(intptr, varname, mempath)
      intptr = 0
    end if

Here is the call graph for this function:

---

The documentation for this interface was generated from the following file:

• /home/runner/work/modflow6/modflow6/src/Utilities/Idm/LoadContext.f90