mom_safe_alloc::safe_alloc_alloc Interface Reference

Detailed Description

Definition at line 40 of file MOM_safe_alloc.F90.

Private functions
subroutine	safe_alloc_allocatable_3d (ptr, is, ie, js, je, nk)
subroutine	safe_alloc_allocatable_2d (ptr, is, ie, js, je)

Functions and subroutines

safe_alloc_allocatable_2d()

subroutine mom_safe_alloc::safe_alloc_alloc::safe_alloc_allocatable_2d ( real, dimension(:,:), allocatable  ptr, integer, intent(in)  is, integer, intent(in)  ie, integer, intent(in)  js, integer, intent(in)  je  )

private

Definition at line 106 of file MOM_safe_alloc.F90.

  real, allocatable :: ptr(:,:)
  integer, intent(in) :: is, ie, js, je
  if (.not.ALLOCATED(ptr)) then
    allocate(ptr(is:ie,js:je))
    ptr(:,:) = 0.0
  endif

safe_alloc_allocatable_3d()

subroutine mom_safe_alloc::safe_alloc_alloc::safe_alloc_allocatable_3d ( real, dimension(:,:,:), allocatable  ptr, integer, intent(in)  is, integer, intent(in)  ie, integer, intent(in)  js, integer, intent(in)  je, integer, intent(in)  nk  )

private

Definition at line 115 of file MOM_safe_alloc.F90.

  real, allocatable :: ptr(:,:,:)
  integer, intent(in) :: is, ie, js, je, nk
  if (.not.ALLOCATED(ptr)) then
    allocate(ptr(is:ie,js:je,nk))
    ptr(:,:,:) = 0.0
  endif

---

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

• /home/adcroft/GitHub/workspace/Gaea-stats-MOM6-examples/MOM6-examples/src/MOM6/src/framework/MOM_safe_alloc.F90