; physical constants  04-03-1996 by P!\K / Un0X

G:=6.67e-11
g:=9.81
N_A:=6.0225e23
R:=8.31
k:=eval(R/N_A)
c_0:=2.99792458e8
my_0:=4*pi*1e-7
epsilon_0:=8.854e-12

; atoms
m_p:=1.6725e-27
m_n:=1.6747e-27
m_e:=0.911e-30
e_0:=1.602e-19
u:=1.66042e-27
h:=6.626e-34
~h:=eval(h/(2*pi))

; astronomical
m_sun:=1.99e30
r_sun:=6.96e8
m_earth:=5.98e24
r_earth:=6.37e6
d_earth:=1.49e11
m_moon:=7.34e22
r_moon:=1.74e6
d_moon:=3.84e8