Changeset 4131 for palm/trunk/SOURCE/module_interface.f90
- Timestamp:
- Aug 2, 2019 11:06:18 AM (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/module_interface.f90
r4127 r4131 397 397 ONLY: salsa_parin, & 398 398 salsa_check_parameters, & 399 salsa_check_data_output_pr, & 399 400 salsa_check_data_output, & 400 401 salsa_init_arrays, & … … 409 410 salsa_data_output_2d, & 410 411 salsa_data_output_3d, & 412 salsa_statistics, & 411 413 salsa_rrd_local, & 412 414 salsa_wrd_local … … 783 785 ENDIF 784 786 787 IF ( unit == 'illegal' .AND. salsa ) THEN 788 CALL salsa_check_data_output_pr( variable, var_count, unit, dopr_unit ) 789 ENDIF 790 785 791 IF ( unit == 'illegal' .AND. user_module_enabled ) THEN 786 792 unit = '' ! ToDo: Seems like a hack. Find a general soultion! … … 1526 1532 IF ( gust_module_enabled ) CALL gust_statistics( mode, sr, tn, dots_max ) 1527 1533 IF ( air_chemistry ) CALL chem_statistics( mode, sr, tn ) 1534 IF ( salsa ) CALL salsa_statistics( mode, sr, tn ) 1528 1535 1529 1536 IF ( user_module_enabled ) CALL user_statistics( mode, sr, tn )
Note: See TracChangeset
for help on using the changeset viewer.