shm_free_r Subroutine

private subroutine shm_free_r(a)

FIXME : Add documentation

Arguments

Type IntentOptional Attributes Name
real, intent(inout), target :: a(*)

Contents

Source Code


Source Code

  subroutine shm_free_r(a)
    use, intrinsic :: iso_c_binding, only : c_loc, c_associated
    implicit none
    real, target, intent(inout) :: a(*)

    include "shm_mpi3_free_tmpl.inc"
       
  end subroutine shm_free_r