package Vectors_3Di is new Vectors_xD (Real, Coordinates);
subtype Vector_3D is Vectors_3Di.Vector_xD;
Zero_Vector_3D : constant Vector_3D := Vectors_3Di.Zero_Vector_xD;
function Image
( | V | : Vector_3D) return String renames Vectors_3Di.Image; |
function Norm
( | V | : Vector_3D) return Vector_3D renames Vectors_3Di.Norm; |
function Angle_Between
( | V_Left, V_Right | : Vector_3D) return Real renames Vectors_3Di.Angle_Between; |