destroy_scheme Subroutine

  1. slau.f90
  2. slau
  3. destroy_scheme

public subroutine destroy_scheme()

Deallocate memory

Arguments

None

Calls

proc~~destroy_scheme~2~~CallsGraph proc~destroy_scheme~2 destroy_scheme interface~dealloc dealloc proc~destroy_scheme~2->interface~dealloc proc~dmsg dmsg proc~destroy_scheme~2->proc~dmsg proc~dealloc_rank2_real dealloc_rank2_real interface~dealloc->proc~dealloc_rank2_real proc~dealloc_rank4_real dealloc_rank4_real interface~dealloc->proc~dealloc_rank4_real proc~dealloc_rank1_integer dealloc_rank1_integer interface~dealloc->proc~dealloc_rank1_integer proc~dealloc_rank2_integer dealloc_rank2_integer interface~dealloc->proc~dealloc_rank2_integer proc~dealloc_rank1_real dealloc_rank1_real interface~dealloc->proc~dealloc_rank1_real proc~dealloc_rank3_integer dealloc_rank3_integer interface~dealloc->proc~dealloc_rank3_integer proc~dealloc_rank3_real dealloc_rank3_real interface~dealloc->proc~dealloc_rank3_real proc~dealloc_rank5_real dealloc_rank5_real interface~dealloc->proc~dealloc_rank5_real proc~dealloc_rank6_real dealloc_rank6_real interface~dealloc->proc~dealloc_rank6_real

Contents

Source Code

destroy_scheme

Source Code

        subroutine destroy_scheme()
          !< Deallocate memory

            implicit none

            call dmsg(1, 'slau', 'destroy_scheme')
            
            call dealloc(F)
            call dealloc(G)
            call dealloc(H)

        end subroutine destroy_scheme