FUNCTION equal_maths_functions
(* SCHEMA step_merged_ap_schema; *)
-- IN AP238 STEP-NC/AP242
FUNCTION equal_maths_functions
(fun1 : maths_function;
fun2 : maths_function ) : LOGICAL;
LOCAL
cum : LOGICAL;
END_LOCAL;
IF fun1 = fun2 THEN
RETURN (TRUE);
END_IF;
cum := equal_maths_spaces(fun1.domain, fun2.domain);
IF cum = FALSE THEN
RETURN (FALSE);
END_IF;
cum := cum AND equal_maths_spaces(fun1.range, fun2.range);
IF cum = FALSE THEN
RETURN (FALSE);
END_IF;
RETURN (UNKNOWN);
END_FUNCTION;
Referenced By
Defintion equal_maths_functions is references by the following definitions:
[Top Level Definitions] [Exit]Generated by STEP Tools® EXPRESS to HTML Converter
2024-09-06T14:00:33-04:00