HatSignal Derived Type
type, public, extends(TimeSignal) :: HatSignal
Periodic signal where in params(1) and params(2) are between 0 and 1. Returns 1 if params(1)<mod(time,period)<params(2). Otherwise returns 0.
Type-Bound Procedures
procedure, public :: calculate => calculateHat
-
interface
private module function calculateHat(this, time, period, params) result(res)
Arguments
Type Intent Optional Attributes Name class(HatSignal), intent(inout) :: this real(kind=rk), intent(in) :: time real(kind=rk), intent(in) :: period real(kind=rk), intent(in), optional, dimension(:) :: params Return Value real(kind=rk)