is_leap_year Interface

public interface is_leap_year

Module Procedures

private pure elemental function is_leap_year_int(year) result(res)

Check if a year is a leap year.

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: year

Return Value logical

private pure elemental function is_leap_year_dt(dt) result(res)

Check if a datetime's year is a leap year.

Arguments

Type IntentOptional Attributes Name
type(datetime_type), intent(in) :: dt

Return Value logical