Time derivative of field.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(integrand_lcce), | intent(in) | :: | self | Integrand. |
||
real(kind=R_P), | intent(in), | optional | :: | t | Time. |
Integrand time derivative.
pure function dU_dt(self, t) result(dState_dt)
!< Time derivative of field.
class(integrand_lcce), intent(in) :: self !< Integrand.
real(R_P), intent(in), optional :: t !< Time.
real(R_P), allocatable :: dState_dt(:) !< Integrand time derivative.
dState_dt = [self%a * self%U + self%b]
endfunction dU_dt