allocate_adi_caches Subroutine

private subroutine allocate_adi_caches()

Arguments

None

Contents

Source Code


Source Code

    subroutine allocate_adi_caches()
        implicit none

        call deallocate_adi_caches()

        allocate(nIRef(nel, nRefs))
        allocate(signsRef(lenof_sign, nRefs))
        allocate(exLvlRef(nRefs))
    end subroutine allocate_adi_caches