(* SCHEMA step_merged_ap_schema; *)
-- IN AP238 STEP-NC/AP242 FUNCTION remove_first (alist : LIST OF GENERIC : GEN ) : LIST OF GENERIC : GEN; LOCAL blist : LIST OF GENERIC : GEN := alist; END_LOCAL; IF SIZEOF(blist) > 0 THEN REMOVE( blist, 1 ); END_IF; RETURN (blist); END_FUNCTION;
|
Generated by STEP Tools® EXPRESS to HTML Converter
2020-07-28T17:02:20-04:00