Ignore:
Timestamp:
Jan 22, 2018 5:17:47 PM (7 years ago)
Author:
kanani
Message:

Removal of chem directive, plus minor changes

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SOURCE/average_3d_data.f90

    r2742 r2766  
    2525! -----------------
    2626! $Id$
     27! Removed preprocessor directive __chem
     28!
     29! 2742 2018-01-12 14:59:47Z suehring
    2730! Enable output of surface temperature
    2831!
     
    126129    USE averaging
    127130
    128 #if defined( __chem )
    129131    USE chemistry_model_mod,                                                   &
    130132        ONLY:  chem_3d_data_averaging
    131 #endif
    132133
    133134    USE control_parameters,                                                    &
     
    514515!
    515516!--          Chemistry quantity
    516 #if defined( __chem )
    517517             IF ( air_chemistry )  THEN
    518518                CALL chem_3d_data_averaging( 'average', doav(ii) )
    519519             ENDIF
    520 #endif
    521520!
    522521!--          User-defined quantity
Note: See TracChangeset for help on using the changeset viewer.