max Interface

public interface max

Module Procedures

private elemental function tem_time_max(left, right) result(res)

Get the maximum of two time definitions.

Read more…

Arguments

Type IntentOptional Attributes Name
type(tem_time_type), intent(in) :: left

First time operant to compare.

type(tem_time_type), intent(in) :: right

Second time operant to compare.

Return Value type(tem_time_type)

Resulting maximum time of left and right.