(* SCHEMA STRUCTURAL_FRAME_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; (* STEP Part 41 unchanged in 2nd edition *)
|
Generated by STEP Tools® EXPRESS to HTML Converter
2023-03-25T00:11:39-04:00