Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(deq_type), | intent(inout) | :: | self |
subroutine delete_special_splines(self)
use splines, only: delete_spline, delete_periodic_spline
implicit none
class(deq_type), intent(in out) :: self
call delete_periodic_spline(self%rbound_spl)
call delete_spline(self%rho_spl)
end subroutine delete_special_splines