Ignore:
Timestamp:
Oct 30, 2018 2:51:23 PM (4 years ago)
Author:
kanani
Message:

Reintegrated fixes/changes from branch chemistry

Location:
palm/trunk/UTIL/chemistry/gasphase_preproc/kpp4palm/templates
Files:
2 added
2 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/UTIL/chemistry/gasphase_preproc/kpp4palm/templates/Rosenbrock_vec.f90

    r3298 r3458  
    22!       and can only be used with KP4.
    33!
     4!Current revisions:
     5!------------------
     6!
     7!
     8! Former revisions:
     9! -----------------------
     10! $Id$
     11! commented USE kp4_compress                       (30.10.2018, forkel)
     12!
     13! initial version (Rev. 3185)                      (June 2018, ketelsen)
     14!
     15
    416SUBROUTINE Rosenbrock(N,Y,Tstart,Tend, &
    517           AbsTol,RelTol,              &
     
    358370!~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    359371
    360   USE kp4_compress,    ONLY: kco_initialize, kco_compress, &
    361                              kco_finalize, cell_done
     372! USE kp4_compress,    ONLY: kco_initialize, kco_compress, &
     373!                            kco_finalize, cell_done
    362374  IMPLICIT NONE
    363375
  • palm/trunk/UTIL/chemistry/gasphase_preproc/kpp4palm/templates/module_header

    r3298 r3458  
    4040!--------------------------------------------------------------------------------!
    4141!
    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
    5442!
    55 ! forkel Sept. 2017: Variables for photolyis added
     43! MODULE HEADER TEMPLATE
    5644!
    57 !
    58 ! Nov. 2016: Intial version (Klaus Ketelsen)
    59 !
    60 !------------------------------------------------------------------------------!
    61 !
    62 
     45!  Initial version (Nov. 2016, ketelsen), for later modifications of module_header
     46!  see comments in kpp4palm/src/create_kpp_module.C
    6347
    6448! Set kpp Double Precision to PALM Default Precision
Note: See TracChangeset for help on using the changeset viewer.