FUNCTION leap_year

(* SCHEMA step_merged_ap_schema; *)

FUNCTION leap_year
      (year : year_number ) : BOOLEAN;
      IF (year MOD 4 = 0) AND (year MOD 100 <> 0) OR (year MOD 400 = 0) THEN
         RETURN (TRUE);
      ELSE
         RETURN (FALSE);
      END_IF;
END_FUNCTION;

Referenced By

Defintion leap_year is references by the following definitions:

Definition	Type
ordinal_date	ENTITY
valid_calendar_date	FUNCTION
week_of_year_and_day_date	ENTITY

[Top Level Definitions] [Exit]

Generated by STEP Tools® EXPRESS to HTML Converter
2024-09-06T14:00:33-04:00