eos_destroy Subroutine

private subroutine eos_destroy(this)

Type Bound

eos_t

Arguments

Type IntentOptional Attributes Name
class(eos_t), intent(inout) :: this

Source Code

   subroutine eos_destroy(this)
      class(eos_t), intent(inout) :: this
      this%is_init = .false.
   end subroutine eos_destroy