Changeset 2766 for palm/trunk/SOURCE/average_3d_data.f90
- Timestamp:
- Jan 22, 2018 5:17:47 PM (7 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/average_3d_data.f90
r2742 r2766 25 25 ! ----------------- 26 26 ! $Id$ 27 ! Removed preprocessor directive __chem 28 ! 29 ! 2742 2018-01-12 14:59:47Z suehring 27 30 ! Enable output of surface temperature 28 31 ! … … 126 129 USE averaging 127 130 128 #if defined( __chem )129 131 USE chemistry_model_mod, & 130 132 ONLY: chem_3d_data_averaging 131 #endif132 133 133 134 USE control_parameters, & … … 514 515 ! 515 516 !-- Chemistry quantity 516 #if defined( __chem )517 517 IF ( air_chemistry ) THEN 518 518 CALL chem_3d_data_averaging( 'average', doav(ii) ) 519 519 ENDIF 520 #endif521 520 ! 522 521 !-- User-defined quantity
Note: See TracChangeset
for help on using the changeset viewer.