00001 /* Copyright (C) 2000, 2001 Stefan Buehler <sbuehler@uni-bremen.de> 00002 Patrick Eriksson <patrick@rss.chalmers.se> 00003 00004 This program is free software; you can redistribute it and/or modify it 00005 under the terms of the GNU General Public License as published by the 00006 Free Software Foundation; either version 2, or (at your option) any 00007 later version. 00008 00009 This program is distributed in the hope that it will be useful, 00010 but WITHOUT ANY WARRANTY; without even the implied warranty of 00011 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 00012 GNU General Public License for more details. 00013 00014 You should have received a copy of the GNU General Public License 00015 along with this program; if not, write to the Free Software 00016 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, 00017 USA. */ 00018 00019 00020 00022 // File description 00024 00042 00043 // External declarations 00045 00046 #include "arts.h" 00047 #include "matpackI.h" 00048 00049 00051 // The constants 00053 00058 extern const Numeric EARTH_RADIUS = 6.378e6; 00059 00065 extern const Numeric EARTH_EQUATORIAL_RADIUS = 6.378137e6; 00066 00072 extern const Numeric EARTH_POLAR_RADIUS = 6.3567523e6; 00073 00082 extern const Numeric RAD2DEG = 57.29577951308232; 00083 00092 extern const Numeric DEG2RAD = 0.01745329251994; 00093 00098 extern const Numeric PLANCK_CONST = 6.626180e-34; 00099 00104 extern const Numeric SPEED_OF_LIGHT = 2.99792458e8; 00105 00110 extern const Numeric BOLTZMAN_CONST = 1.380662e-23; 00111 00116 extern const Numeric AVOGADROS_NUMB = 6.0220450e26; 00117 00122 extern const Numeric ATOMIC_MASS_UNIT = 1.6606E-27; 00123 00128 extern const Numeric COSMIC_BG_TEMP = 2.735; 00129 00134 extern const Numeric SUN_TEMP = 6000.0; 00135 00140 // reference: http://thesapps.com/Doug/exp/ 00141 extern const Numeric EULER_NUMBER = 2.7182818284590452; 00142 00147 extern const Numeric LOG10_EULER_NUMBER = 0.43429448190325176; 00148 00153 extern const Numeric NAT_LOG_TEN = 2.3025850929940459; 00154 00159 extern const Numeric NAT_LOG_2 = 0.69314718055994; 00160 00165 extern const Numeric SQRT_NAT_LOG_2 = 0.832554611; 00166 00171 extern const Numeric PI = 3.14159265358979; 00172 00180 extern const Numeric ATM2PA = 1.01325e5; 00181 00189 extern const Numeric TORR2PA = 133.3227; 00190 00196 extern const Numeric TEMP_0_C = 273.15; 00197 00203 extern const Numeric PRES_STAND = 101300.25; 00204 00210 extern const Numeric LOSCHMIDT_CONST = 2.686763E25; 00211 00217 extern const Numeric EARTH_GRAV_CONST = 3.98601E14; 00218 00226 extern const Numeric HZ2CM = 0.01 / SPEED_OF_LIGHT; 00227 00233 Joker joker; 00234