finalise_eqfile Subroutine

public subroutine finalise_eqfile(self)

Type Bound

abstract_eqfile_geo_type

Arguments

Type IntentOptional Attributes Name
class(abstract_eqfile_geo_type), intent(inout) :: self

Contents

Source Code


Source Code

  subroutine finalise_eqfile(self)
    class(abstract_eqfile_geo_type), intent(in out) :: self
    self%initialised = .false.
    call self%dealloc_arrays ; call self%delete_splines
  end subroutine finalise_eqfile