blob: 3437271ec3ba15946b5bdde0a778f0ddab378a33 [file] [log] [blame]
with Aspect1_Vectors_2D;
generic
with package Position_2d_Pkg is new Aspect1_Vectors_2D (<>);
with package Speed_2d_Pkg is new Aspect1_Vectors_2D (<>);
package Aspect1_Horizontal is
function Theta_D(s: Position_2d_Pkg.Vect2; nzv: Speed_2d_Pkg.Nz_vect2)
return float;
end Aspect1_Horizontal;