home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0010 - 0019 / ibm0010-0019 / ibm0010.tar / ibm0010 / DERIVE.ZIP / PHYSICAL.MTH < prev    next >
Encoding:
Text File  |  1989-09-20  |  1.4 KB  |  78 lines
  1. "File:  PHYSICAL.MTH  (c)          09/20/89           Soft Warehouse, Inc."
  2.  
  3. "Fundamental Physical Constants -- Reference: Physics Today, August 1989"
  4.  
  5. "Load METRIC.MTH before loading this file."
  6.  
  7. "Speed of light in vacuum:"
  8.  
  9. C_:=299792458*(METER/SECOND)
  10.  
  11. "Newtonian constant of gravitation:"
  12.  
  13. G_:=6.67260*10^(-14)*(METER^3/(GRAM*SECOND^2))
  14.  
  15. "Planck constant:"
  16.  
  17. H_:=6.6260755*10^(-34)*JOULE*SECOND
  18.  
  19. "Elementary charge:"
  20.  
  21. E_:=1.60217733*10^(-19)*COULOMB
  22.  
  23. "Fine structure constant:"
  24.  
  25. ALPHA:=0.00729735308
  26.  
  27. "Rydberg constant:"
  28.  
  29. R_INF:=10973731.534/METER
  30.  
  31. "Bohr radius:"
  32.  
  33. A0:=5.29177249*10^(-11)*METER
  34.  
  35. "Mass of an electron, proton, and neutron:"
  36.  
  37. ME:=9.1093898*10^(-28)*GRAM
  38.  
  39. MP:=1.6726231*10^(-24)*GRAM
  40.  
  41. MN:=1.6749286*10^(-24)*GRAM
  42.  
  43. "Compton wavelength of an electron, proton, and neutron:"
  44.  
  45. LAMBDA_C:=2.42631058*10^(-12)*METER
  46.  
  47. LAMBDA_CP:=1.32141002*10^(-15)*METER
  48.  
  49. LAMBDA_CN:=1.31959110*10^(-15)*METER
  50.  
  51. "Classical radius of an electron:"
  52.  
  53. RE_:=2.81794092*10^(-15)*METER
  54.  
  55. "Avogadro constant:"
  56.  
  57. NA:=6.0221367*10^23/MOLE
  58.  
  59. "Faraday constant:"
  60.  
  61. F_:=96485.309*(COULOMB/MOLE)
  62.  
  63. "Molar gas constant:"
  64.  
  65. R_:=8.314511*(JOULE/(MOLE*DEGREE_KELVIN))
  66.  
  67. "Boltzmann constant:"
  68.  
  69. K_:=1.380658*10^(-23)*(JOULE/DEGREE_KELVIN)
  70.  
  71. "Stefan-Boltzmann constant:"
  72.  
  73. SIGMA:=5.67051*10^(-8)*WATT/(METER^2*DEGREE_KELVIN^4)
  74.  
  75. "Standard acceleration of gravity:"
  76.  
  77. GN:=9.80665*(METER/SECOND^2)
  78.