GAS_singles_uniform_finalize Subroutine

    subroutine GAS_singles_uniform_finalize(this)
        class(GAS_singles_PC_uniform_ExcGenerator_t), intent(inout) :: this

        if (allocated(this%allowed_holes)) then
            deallocate(this%allowed_holes, this%indexer)
            if (this%create_lookup) deallocate(lookup_property_indexer)
        end if
    end subroutine GAS_singles_uniform_finalize