Extract integrand state field.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(integrand_oscillation), | intent(in) | :: | self | Integrand. |
State.
pure function output(self) result(state)
!< Extract integrand state field.
class(integrand_oscillation), intent(in) :: self !< Integrand.
real(R_P) :: state(1:2) !< State.
state = self%U
endfunction output