Ignore:
Timestamp:
Mar 15, 2019 3:36:25 PM (3 years ago)
Author:
forkel
Message:

editing in kpp4palm: add statements for avoiding unused variables, remove $Id

Location:
palm/trunk/UTIL/chemistry/gasphase_preproc/kpp4palm/src
Files:
11 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/UTIL/chemistry/gasphase_preproc/kpp4palm/src/create_kpp_module.C

    r3797 r3799  
    99//
    1010// ############################################################################
    11 //
    12 //Current revisions:
    13 //------------------
    1411//
    1512//
    1613//Former revisions:
    1714//-----------------
    18 //$Id: create_kpp_module.C 3453 2018-10-30 13:21:51Z forkel $
     15// Deleted $Id since document_changes does not work for C and C++         (15.03.2019, forkel)
     16//
    1917// OpenMP version    (15.03.2019, ketelsen)
    2018//
     
    199197   generate_module_header();
    200198
    201 // create_set_cs
     199// Create subroutine to communicate mechanism name to other modules
    202200   create_set_cs();
    203201
  • palm/trunk/UTIL/chemistry/gasphase_preproc/kpp4palm/src/create_kpp_module.h

    r3780 r3799  
    1818// Former revisions:
    1919// -----------------------
    20 // $Id$
    21 // forkel   22.02.2019: Added create_set_cs
    22 // ketelsen 18.09.2018: Removed create_fill_routine
     20// Deleted $Id since document_changes does not work for C and C++         (15.03.2019, forkel)
     21//
     22// Added create_set_cs   (22.02.2019, forkel)
     23//
     24// Removed create_fill_routine   (18.09.2018, ketelsen)
    2325//
    2426// initial version                                  (Nov. 2016, ketelsen)
  • palm/trunk/UTIL/chemistry/gasphase_preproc/kpp4palm/src/expand_decomp.C

    r3789 r3799  
    99//
    1010// ############################################################################
    11 //Current revisions:
    12 //------------------
    1311//
    1412//
    1513// Former revisions:
    1614// -----------------------
    17 // $Id: expand_decomp.C 3327 2018-10-09 19:55:00Z forkel $
     15// Deleted $Id since document_changes does not work for C and C++   (15.03.2019, forkel)
    1816//
    1917// Added switch for de-indexing == 2 (W is not needed then)       (08.03.2019, forkel)
  • palm/trunk/UTIL/chemistry/gasphase_preproc/kpp4palm/src/expand_decomp.h

    r3458 r3799  
    1111//
    1212// ############################################################################
    13 //Current revisions:
    14 //------------------
    1513//
    1614//
    1715// Former revisions:
    1816// -----------------------
    19 // $Id: expand_decomp.h 3327 2018-10-09 19:55:00Z forkel $
     17// Deleted $Id since document_changes does not work for C and C++   (15.03.2019, forkel)
    2018//
    2119// initial version                                  (Nov. 2016, ketelsen)
  • palm/trunk/UTIL/chemistry/gasphase_preproc/kpp4palm/src/fortran_file.C

    r3797 r3799  
    1111//
    1212//
    13 //Current revisions:
    14 //------------------
    15 //
    16 //
    1713//Former revisions:
    1814//-----------------
    19 //$Id:
     15// Deleted $Id since document_changes does not work for C and C++   (15.03.2019, forkel)
     16//
     17// For vector version edit phot(nphot) - was before done in kpp4pal.ksh (15.03.2019, forkel)
     18//
    2019// OpenMP version    (15.03.2019, ketelsen)
    2120//
     
    676675//  Replace Roundoff = WLAMCH('E') since WLAMCH does not work everywhere
    677676       ip->global_substitute("Roundoff = WLAMCH('E')","roundoff = epsilon(one)");
     677//  For vector version edit  phot(nphot) from INLINE in chem_gasphase_mod.kpp
     678    if(kpp_switches.is_vector()) {
     679        ip->global_substitute("phot(nphot)","phot(vl_dim,nphot)");
     680    }
    678681
    679682// Now do some cosmetics to adapt the KPP generated output a bit o the looks of PALM,
  • palm/trunk/UTIL/chemistry/gasphase_preproc/kpp4palm/src/fortran_file.h

    r3458 r3799  
    1212// ############################################################################
    1313//
    14 //Current revisions:
    15 //------------------
    16 //
    1714//
    1815// Former revisions:
    1916// -----------------------
    20 // $Id: fortran_file.h 3327 2018-10-09 19:55:00Z forkel $
     17// Deleted $Id since document_changes does not work for C and C++         (15.03.2019, forkel)
    2118//
    2219// added edit_Initialize                            (Sept.2018, forkel)
  • palm/trunk/UTIL/chemistry/gasphase_preproc/kpp4palm/src/main.C

    r3458 r3799  
    44//     create_mz_kpp_module
    55//
    6 //     create scalar code from .f90 sources created by KPP to be used in MESSy
     6//     create scalar code from .f90 sources created by KPP to be used in PALM4U
    77//
    8 //     COPYRIGHT Klaus Ketelsen and MPI-CH   April 2007
     8//     COPYRIGHT Klaus Ketelsen and MPI-CH   April 2007,
     9//               Klaus Ketelsen, 2016
    910//
    1011// ############################################################################
    1112//
    12 //Current revisions:
    13 //------------------
    14 //
    15 //
    1613// Former revisions:
    1714// -----------------------
    18 // $Id: main.C 3327 2018-10-09 19:55:00Z forkel $
     15// Deleded $Id since document_changes does not work for C and C++         (15.03.2019, forkel)
    1916//
    2017// initial version       (Nov. 2016, ketelsen)
     
    3532
    3633   cout << "####################################################" <<endl ;
    37    cout << "###             KP4 = KPP POST PROCESSOR         ###" <<endl ;
    38    cout << "###                   Version 1.0                ###" <<endl ;
     34   cout << "###        KPP4PALM = KPP POST PROCESSOR         ###" <<endl ;
     35   cout << "###               KP4 Version 1.0                ###" <<endl ;
    3936   cout << "### (C) by Klaus Ketelsen and MPI-CH, April 2007 ###" <<endl ;
     37   cout << "###               KPP4PALM                       ###" <<endl ;
     38   cout << "### (C) by Klaus Ketelsen, November 2016         ###" <<endl ;
    4039   cout << "####################################################" <<endl ;
    4140
     
    7170
    7271   cout << "####################################################" <<endl ;
    73    cout << "###                END OF KP4                    ###" <<endl ;
     72   cout << "###                END OF KPP4PALM               ###" <<endl ;
    7473   cout << "####################################################" <<endl ;
    7574
  • palm/trunk/UTIL/chemistry/gasphase_preproc/kpp4palm/src/program_line.C

    r3458 r3799  
    1010// ############################################################################
    1111//
    12 //Current revisions:
    13 //------------------
    14 //
    1512//
    1613// Former revisions:
    1714// -----------------------
    18 // $Id: program_line.C 3327 2018-10-09 19:55:00Z forkel $
     15// Deleted $Id since document_changes does not work for C and C++   (15.03.2019, forkel)
    1916//
    2017// global_subtolower     (June 2018, forkel)
  • palm/trunk/UTIL/chemistry/gasphase_preproc/kpp4palm/src/program_line.h

    r3458 r3799  
    1212// ############################################################################
    1313//
    14 //Current revisions:
    15 //------------------
    16 //
    1714//
    1815// Former revisions:
    1916// -----------------------
    20 // $Id: program_line.h 3327 2018-10-09 19:55:00Z forkel $
     17// Deleted $Id since document_changes does not work for C and C++   (15.03.2019, forkel)
    2118//
    2219// added    void   global_subtolower(string &line); (June 2018, forkel)
  • palm/trunk/UTIL/chemistry/gasphase_preproc/kpp4palm/src/utils.C

    r3458 r3799  
    1010// ############################################################################
    1111//
    12 //Current revisions:
    13 //------------------
    14 //
    1512//
    1613// Former revisions:
    1714// -----------------------
    18 // $Id: utils.C 3327 2018-10-09 19:55:00Z forkel $
     15// Deleted $Id since document_changes does not work for C and C++   (15.03.2019, forkel)
    1916//
    2017// initial version                                  (Nov. 2016, ketelsen)
  • palm/trunk/UTIL/chemistry/gasphase_preproc/kpp4palm/src/utils.h

    r3458 r3799  
    1212// ############################################################################
    1313//
    14 //Current revisions:
    15 //------------------
    16 //
    1714//
    1815// Former revisions:
    1916// -----------------------
    20 // $Id: utils.h 3327 2018-10-09 19:55:00Z forkel $
     17// Deleted $Id since document_changes does not work for C and C++   (15.03.2019, forkel)
    2118//
    2219// initial version                                  (Nov. 2016, ketelsen)
Note: See TracChangeset for help on using the changeset viewer.