texactTestO.h - pism - [fork] customized build of PISM, the parallel ice sheet model (tillflux branch)
  HTML git clone git://src.adamsgaard.dk/pism
   DIR Log
   DIR Files
   DIR Refs
   DIR LICENSE
       ---
       texactTestO.h (1663B)
       ---
            1 /*
            2    Copyright (C) 2011, 2016 Ed Bueler and Constantine Khroulev
            3   
            4    This file is part of PISM.
            5   
            6    PISM is free software; you can redistribute it and/or modify it under the
            7    terms of the GNU General Public License as published by the Free Software
            8    Foundation; either version 3 of the License, or (at your option) any later
            9    version.
           10   
           11    PISM is distributed in the hope that it will be useful, but WITHOUT ANY
           12    WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
           13    FOR A PARTICULAR PURPOSE.  See the GNU General Public License for more
           14    details.
           15   
           16    You should have received a copy of the GNU General Public License
           17    along with PISM; if not, write to the Free Software
           18    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
           19 */
           20 
           21 #ifndef __exactTestO_h
           22 #define __exactTestO_h 1
           23 
           24 #ifdef __cplusplus
           25 extern "C"
           26 {
           27 #endif
           28 
           29 /*
           30 Basal-melt rate computation exact solution.  Utterly straightforward arithmetic.
           31 
           32 See also src/exact/simpleO.c.
           33 
           34 Fills this z-dependent quantity:
           35      TT    = temperature at z, whether in ice (z >= 0) or in bedrock (z < 0)
           36 Also fills these z-independent quantities:
           37      Tm    = the pressure-melting temperature (K) at the base of the ice (z=0)
           38      qice  = upward heat flux (J m-2 s-1) within the ice, 0 <= z < H0
           39      qbed  = upward heat flux (J m-2 s-1) within the bedrock, -B0 < z < 0
           40      bmelt = exact solution for melt rate (ice-equivalent m s-1) at base (z=0)
           41  */
           42 
           43 struct TestOParameters {
           44   double TT;
           45   double Tm;
           46   double qice;
           47   double qbed;
           48   double bmelt;
           49 };
           50 
           51 struct TestOParameters exactO(double z);
           52 
           53 #ifdef __cplusplus
           54 }
           55 #endif
           56 
           57 #endif  /* __exactTestO_h */
           58