%
% PURPOSE: Display the sim parameters.
%
  disp(sprintf(' %-15f: Foward speed, knots.', vel/kph2mps))
  disp([num2str(vel/kph2mps),'  Foward speed, knots.'])
  disp([num2str(Tp),'  Thrust, Newtons.'])
  disp([num2str(mass),'  Mass, kg.'])
  disp([num2str(len),'  Length, Meters.'])
  disp([num2str(dia),'  Diameter, Meters.'])
  disp([num2str(dia/in2m),'  Diameter, Inches.'])
  disp([num2str(xG),'  x CG offset, Meters.'])
  disp([num2str(-xPcp),'  Dist from pivot to ring CP, Meters.'])
  disp([num2str(-xPcp/in2m),'  Dist from pivot to ring CP, In.'])
  disp([num2str(ControlArea),'  Control surface Area, Meters^2.'])
  disp([num2str(ControlArea/in2m^2),...
       '  Control surface Area, Inches^2.'])
  disp([num2str(RingArea),'  Area of ring and struts, M^2.'])
  disp([num2str(Ar),'  Ring/strut aspect ratio.'])
  disp([num2str(Cdc),'  Crossflow drag coefficient'])
  disp([num2str(Cd0),'  Constant component of drag coeff.'])
  disp([num2str(Ef),'  Oswald efficiency factor.'])
  disp([num2str(dCl),'  Coeff. of lift slope.'])
  disp([num2str(-xR),'  Distance from CG to CP of ring, Meters.'])
  disp([num2str(-xP),'  Distance from CG to pivot point, Meters.'])
  disp([num2str(Izz),'  Inertia about (principal) z axis, kg-m^2.'])
  disp([num2str(Ixx),'  Inertia about (principal) x axis, kg-m^2.'])
  disp([num2str(Nr),'  Deriv of N wrto r, kg-m.'])
  disp([num2str(Nv),'  Deriv of N wrto v (Munk Moment), kg.'])
  disp([num2str(Yr),'  Deriv of Y wrto r, kg.'])
  disp([num2str(Yv),'  Deriv of Y wrto v, kg/m.'])
  disp([num2str(Yvdot),'  Deriv of Y wrto v-dot (Added Mass),kg.'])
  disp([num2str(Nrdot),'  Deriv of N wrto r-dot (Added Inr),kg-m^2.'])
  disp([num2str(Yrdot),'  Deriv of Y wrto r-dot.'])
  disp([num2str(Nvdot),'  Deriv of N wrto v-dot.'])
  disp([num2str(Yrabsv),'  Deriv of Y wrto r|v|.'])
  disp([num2str(Yvabsv),'  Deriv of Y wrto v|v|.'])
  disp([num2str(Nvabsv),'  Deriv of N wrto v|v|.'])
  disp([num2str(Nrabsr),'  Deriv of N wrto r|r|.'])



