Return true if the end of simulation is reached.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(time_object), | intent(in) | :: | self | Time object. |
Test result.
elemental function is_the_end(self) result(yes)
!< Return true if the end of simulation is reached.
class(time_object), intent(in) :: self !< Time object.
logical :: yes !< Test result.
yes = ((self%t==self%t_max).or.(self%n==self%n_max))
endfunction is_the_end