shm_free_c1 Subroutine

private subroutine shm_free_c1(a)

FIXME : Add documentation

Arguments

Type IntentOptional Attributes Name
complex, intent(inout) :: a(:)

Contents

Source Code


Source Code

  subroutine shm_free_c1(a)
    implicit none
    complex, intent(inout) :: a(:) 
    call shm_free_c(a)
  end subroutine shm_free_c1