FUNCTION orthogonal_complement

(* SCHEMA step_merged_ap_schema; *)

FUNCTION orthogonal_complement
      (vec : direction ) : direction;
   LOCAL
      result : direction;
   END_LOCAL;
      IF (vec.dim <> 2) OR NOT EXISTS(vec) THEN
         RETURN (?);
      ELSE
         result := dummy_gri || direction([ -vec.direction_ratios[2], vec.direction_ratios[1] ]);
         RETURN (result);
      END_IF;
END_FUNCTION;

Referenced By

Defintion orthogonal_complement is references by the following definitions:

Definition	Type
base_axis	FUNCTION
build_2axes	FUNCTION

[Top Level Definitions] [Exit]

Generated by STEP Tools® EXPRESS to HTML Converter
2025-09-04T17:14:54-04:00