home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 11 Util / 11-Util.zip / qtawkos2.zip / QTAUTL.ZIP / setstd.dat < prev    next >
Text File  |  1991-03-16  |  1KB  |  35 lines
  1. # Data file for QTAwk utility calcrp.exp (calcrpna.exp)
  2. # Use with following command line:
  3. #  QTAwk -fcalcrp.exp setstd.dat -
  4. #
  5. # set feet/statute mile
  6. 5280 smi=
  7. # set feet/international nautical mile
  8. 1 nts smi * nmi=
  9. # set gravitational constant SI units - Nm^2/kg^2
  10. 6.673231e-11 G=
  11. # Note following Earth constants set from WGS 84
  12. # set Earth equatorial radius - meters
  13. 6378137 re=
  14. # set Earth flattening
  15. 1 298.257223563 / f=
  16. # set Earth polar radius
  17. 1 f - re * rp=
  18. # set Earth eccentricity
  19. f 2 f - * ecen2=
  20. # set Earth gravitational constant - atmosphere included - m^3/sec^2
  21. 3.986005e14 GM=
  22. # set Earth mass - Kg
  23. GM G / Me=
  24. # set Earth gravitational constant at equator - m/sec^2
  25. # to convert to english units use: ge 1e3 / ktm smi *
  26. GM re 2 ^ / ge=
  27. # set Earth gravitational constant at polar - m/sec^2
  28. # to convert to english units use: gp 1e3 / ktm smi *
  29. GM rp 2 ^ / gp=
  30. # set speed of light - meters/sec
  31. 2.997925010e8 c=
  32. # set Standard Rate Turn in radians - 3 deg/sec
  33. 3 dtr push srt= 2 / srt_2=
  34. cls
  35.