ESMF_AlarmMod Module

Uses

Interfaces

public interface operator(==)

private function ESMF_AlarmEQ(alarm1, alarm2)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_Alarm),	intent(in)			::	alarm1
type(ESMF_Alarm),	intent(in)			::	alarm2

Return Value logical

Derived Types

type, public :: ESMF_AlarmInt

Components

Type	Visibility	Attributes		Name		Initial
character(len=256),	public		::	name	=	" "
type(ESMF_TimeInterval),	public		::	RingInterval
type(ESMF_Time),	public		::	RingTime
type(ESMF_Time),	public		::	PrevRingTime
type(ESMF_Time),	public		::	StopTime
integer,	public		::	ID
integer,	public		::	AlarmMutex
logical,	public		::	Ringing
logical,	public		::	Enabled
logical,	public		::	RingTimeSet
logical,	public		::	RingIntervalSet
logical,	public		::	StopTimeSet

type, public :: ESMF_Alarm

Components

Type	Visibility	Attributes		Name		Initial
type(ESMF_AlarmInt),	public,	pointer	::	alarmint	=>	null()

Functions

public function ESMF_AlarmIsRinging(alarm, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_Alarm),	intent(in)			::	alarm
integer,	intent(out),	optional		::	rc

Return Value logical

Subroutines

public subroutine ESMF_AlarmSet(alarm, name, RingTime, RingInterval, StopTime, Enabled, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_Alarm),	intent(inout)			::	alarm
character(len=*),	intent(in),	optional		::	name
type(ESMF_Time),	intent(in),	optional		::	RingTime
type(ESMF_TimeInterval),	intent(in),	optional		::	RingInterval
type(ESMF_Time),	intent(in),	optional		::	StopTime
logical,	intent(in),	optional		::	Enabled
integer,	intent(out),	optional		::	rc

public subroutine ESMF_AlarmDestroy(alarm, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_Alarm),	intent(inout)			::	alarm
integer,	intent(out),	optional		::	rc

public subroutine ESMF_AlarmGet(alarm, name, RingTime, PrevRingTime, RingInterval, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_Alarm),	intent(in)			::	alarm
character(len=*),	intent(out),	optional		::	name
type(ESMF_Time),	intent(out),	optional		::	RingTime
type(ESMF_Time),	intent(out),	optional		::	PrevRingTime
type(ESMF_TimeInterval),	intent(out),	optional		::	RingInterval
integer,	intent(out),	optional		::	rc

public subroutine ESMF_AlarmEnable(alarm, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_Alarm),	intent(inout)			::	alarm
integer,	intent(out),	optional		::	rc

public subroutine ESMF_AlarmDisable(alarm, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_Alarm),	intent(inout)			::	alarm
integer,	intent(out),	optional		::	rc

public subroutine ESMF_AlarmRingerOn(alarm, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_Alarm),	intent(inout)			::	alarm
integer,	intent(out),	optional		::	rc

public subroutine ESMF_AlarmRingerOff(alarm, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_Alarm),	intent(inout)			::	alarm
integer,	intent(out),	optional		::	rc

public subroutine ESMF_AlarmValidate(alarm, opts, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_Alarm),	intent(in)			::	alarm
character(len=*),	intent(in),	optional		::	opts
integer,	intent(out),	optional		::	rc

public subroutine ESMF_AlarmPrint(alarm, opts, rc)

Arguments

Type	Intent	Optional	Attributes		Name
type(ESMF_Alarm),	intent(in)			::	alarm
character(len=*),	intent(in),	optional		::	opts
integer,	intent(out),	optional		::	rc