source: palm/trunk/UTIL/chemistry/gasphase_preproc/kpp4palm/templates/module_header @ 3393

Last change on this file since 3393 was 3298, checked in by kanani, 6 years ago

Merge chemistry branch at r3297 to trunk

File size: 3.5 KB
Line 
1!------------------------------------------------------------------------------!
2!
3! ****** Module chem_gasphase_mod is automatically generated by kpp4palm ******
4!
5!   ********* Please do NOT change this Code, it will be ovewritten *********
6!
7!------------------------------------------------------------------------------!
8! This file was created by KPP (http://people.cs.vt.edu/asandu/Software/Kpp/)
9! and kpp4palm (created by Klaus Ketelsen). kpp4palm is an adapted version
10! of KP4 (Jöckel, P., Kerkweg, A., Pozzer, A., Sander, R., Tost, H., Riede,
11! H., Baumgaertner, A., Gromov, S., and Kern, B., 2010: Development cycle 2 of
12! the Modular Earth Submodel System (MESSy2), Geosci. Model Dev., 3, 717-752,
13! https://doi.org/10.5194/gmd-3-717-2010). KP4 is part of the Modular Earth
14! Submodel System (MESSy), which is is available under the  GNU General Public
15! License (GPL).
16!
17! KPP is free software; you can redistribute it and/or modify it under the terms
18! of the General Public Licence as published by the Free Software Foundation;
19! either version 2 of the License, or (at your option) any later version.
20! KPP is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY;
21! without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR
22! PURPOSE. See the GNU General Public Licence for more details.
23!
24!------------------------------------------------------------------------------!
25! This file is part of the PALM model system.
26!
27! PALM is free software: you can redistribute it and/or modify it under the
28! terms of the GNU General Public License as published by the Free Software
29! Foundation, either version 3 of the License, or (at your option) any later
30! version.
31!
32! PALM is distributed in the hope that it will be useful, but WITHOUT ANY
33! WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR
34! A PARTICULAR PURPOSE.  See the GNU General Public License for more details.
35!
36! You should have received a copy of the GNU General Public License along with
37! PALM. If not, see <http://www.gnu.org/licenses/>.
38!
39! Copyright 1997-2018 Leibniz Universitaet Hannover
40!--------------------------------------------------------------------------------!
41!
42! Current revisions:
43! ------------------
44!
45!
46! Former revisions:
47! -----------------
48! $Id: module_header 2460 2017-09-13 14:47:48Z forkel $
49! forkel June 2018: qvap, fakt added
50! forkel June 2018: reset case in  Initialize, Integrate, Update_rconst
51!
52!
53! 2460 2017-09-13 14:47:48Z forkel
54!
55! forkel Sept. 2017: Variables for photolyis added
56!
57!
58! Nov. 2016: Intial version (Klaus Ketelsen)
59!
60!------------------------------------------------------------------------------!
61!
62
63
64! Set kpp Double Precision to PALM Default Precision
65
66  USE kinds,            ONLY: dp=>wp
67
68  USE pegrid,           ONLY: myid, threads_per_task
69
70  IMPLICIT        NONE
71  PRIVATE
72  !SAVE  ! NOTE: OCCURS AGAIN IN AUTOMATICALLY GENERATED CODE ...
73
74!  PUBLIC :: IERR_NAMES
75 
76! PUBLIC :: SPC_NAMES, EQN_NAMES, EQN_TAGS, REQ_HET, REQ_AEROSOL, REQ_PHOTRAT &
77!         , REQ_MCFCT, IP_MAX, jname
78
79  PUBLIC :: eqn_names,  phot_names, spc_names
80  PUBLIC :: nmaxfixsteps
81  PUBLIC :: atol, rtol
82  PUBLIC :: nspec, nreact
83  PUBLIC :: temp
84  PUBLIC :: qvap
85  PUBLIC :: fakt
86  PUBLIC :: phot
87  PUBLIC :: rconst
88  PUBLIC :: nvar
89  PUBLIC :: nphot
90  PUBLIC :: vl_dim                     ! Public to ebable other modules to distiguish between scalar and vec
91 
92  PUBLIC :: Initialize, Integrate, Update_rconst
93  PUBLIC :: chem_gasphase_integrate
94  PUBLIC :: initialize_kpp_ctrl
95
96! END OF MODULE HEADER TEMPLATE
Note: See TracBrowser for help on using the repository browser.