TrimArrayReal Subroutine

public subroutine TrimArrayReal(a, k)

Arguments

Type IntentOptional AttributesName
real(kind=real64), intent(inout), allocatable:: a(:,:)
integer(kind=int32), intent(in) :: k

Contents

None