OPERATOR ( > ) Interface

public interface OPERATOR ( > )

Module Procedures

private function GreaterThan(time1, time2) result(greater)

return true if time1 is greater than time2

Arguments

Type IntentOptional Attributes Name
type(DateTime), intent(in) :: time1
type(DateTime), intent(in) :: time2

Return Value logical