00001 /* Copyright (C) 2000-2008 00002 Stefan Buehler <sbuehler@ltu.se> 00003 Patrick Eriksson <patrick@rss.chalmers.se> 00004 00005 This program is free software; you can redistribute it and/or modify it 00006 under the terms of the GNU General Public License as published by the 00007 Free Software Foundation; either version 2, or (at your option) any 00008 later version. 00009 00010 This program is distributed in the hope that it will be useful, 00011 but WITHOUT ANY WARRANTY; without even the implied warranty of 00012 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 00013 GNU General Public License for more details. 00014 00015 You should have received a copy of the GNU General Public License 00016 along with this program; if not, write to the Free Software 00017 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, 00018 USA. */ 00019 00020 00021 00023 // File description 00025 00043 00044 // External declarations 00046 00047 #include "arts.h" 00048 #include "matpackI.h" 00049 00050 00052 // The constants 00054 00059 extern const Numeric EARTH_RADIUS = 6.378e6; 00060 00069 extern const Numeric RAD2DEG = 57.29577951308232; 00070 00079 extern const Numeric DEG2RAD = 0.01745329251994; 00080 00085 extern const Numeric PLANCK_CONST = 6.626180e-34; 00086 00091 extern const Numeric SPEED_OF_LIGHT = 2.99792458e8; 00092 00097 extern const Numeric BOLTZMAN_CONST = 1.380662e-23; 00098 00103 extern const Numeric AVOGADROS_NUMB = 6.0220450e26; 00104 00109 extern const Numeric ATOMIC_MASS_UNIT = 1.6606E-27; 00110 00115 extern const Numeric COSMIC_BG_TEMP = 2.735; 00116 00121 extern const Numeric SUN_TEMP = 6000.0; 00122 00127 // reference: http://thesapps.com/Doug/exp/ 00128 extern const Numeric EULER_NUMBER = 2.7182818284590452; 00129 00134 extern const Numeric LOG10_EULER_NUMBER = 0.43429448190325176; 00135 00140 extern const Numeric NAT_LOG_TEN = 2.3025850929940459; 00141 00146 extern const Numeric NAT_LOG_2 = 0.69314718055994; 00147 00152 extern const Numeric SQRT_NAT_LOG_2 = 0.832554611; 00153 00158 extern const Numeric PI = 3.14159265358979; 00159 00167 extern const Numeric ATM2PA = 1.01325e5; 00168 00176 extern const Numeric TORR2PA = 133.3227; 00177 00183 extern const Numeric TEMP_0_C = 273.15; 00184 00190 extern const Numeric PRES_STAND = 101300.25; 00191 00197 extern const Numeric LOSCHMIDT_CONST = 2.686763E25; 00198 00204 extern const Numeric EARTH_GRAV_CONST = 3.98601E14; 00205 00213 extern const Numeric HZ2CM = 0.01 / SPEED_OF_LIGHT; 00214 00220 extern const Index GFIELD1_F_GRID = 0; 00221 00227 extern const Index GFIELD3_P_GRID = 0; 00228 00234 extern const Index GFIELD3_LAT_GRID = 1; 00235 00241 extern const Index GFIELD3_LON_GRID = 2; 00242 00248 extern const Index GFIELD4_FIELD_NAMES = 0; 00249 00255 extern const Index GFIELD4_IA_GRID = 0; 00256 00262 extern const Index GFIELD4_P_GRID = 1; 00263 00269 extern const Index GFIELD4_F_GRID = 1; 00270 00276 extern const Index GFIELD4_LAT_GRID = 2; 00277 00283 extern const Index GFIELD4_ZA_GRID = 2; 00284 00290 extern const Index GFIELD4_LON_GRID = 3; 00291 00297 extern const Index GFIELD4_AA_GRID = 3; 00298 00304 Joker joker; 00305 00306 00307 00308 /*=========================================================================== 00309 === Definition of retrieval quantity tag strings 00310 ===========================================================================*/ 00311 00312 extern const String ABSSPECIES_MAINTAG = "Absorption species"; 00313 extern const String POINTING_MAINTAG = "Sensor pointing"; 00314 extern const String POLYFIT_MAINTAG = "Polynomial baseline fit"; 00315 extern const String TEMPERATURE_MAINTAG = "Atmospheric temperatures"; 00316