Changeset 4808 for palm/trunk


Ignore:
Timestamp:
Dec 3, 2020 1:08:23 PM (4 years ago)
Author:
eckhard
Message:

Small error handling improvements

  • Added offending height values to model-top error message
  • Temporarily disabling dataset validation, enabling compatibility for HHL fields without time dimension
Location:
palm/trunk/UTIL/inifor/src
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/UTIL/inifor/src/inifor.f90

    r4756 r4808  
    8585! Added main loop support for computation of geostrophic winds and surface
    8686!     pressure
    87 ! Cleaned up terminal output, show some meVssages only with --debug option
     87! Cleaned up terminal output, show some messages only with --debug option
    8888!
    8989! 3183 2018-07-27 14:25:55Z suehring
  • palm/trunk/UTIL/inifor/src/inifor_defs.f90

    r4790 r4808  
    214214    ACHAR( 10 ) // ' Copyright 2017-2020 Deutscher Wetterdienst Offenbach' !< Copyright notice
    215215 CHARACTER(LEN=*), PARAMETER ::  LOG_FILE_NAME = 'inifor.log' !< Name of INIFOR's log file
    216  CHARACTER(LEN=*), PARAMETER ::  VERSION = '2.1.3'            !< INIFOR version number
     216 CHARACTER(LEN=*), PARAMETER ::  VERSION = '2.1.4'            !< INIFOR version number
    217217 
    218218 END MODULE inifor_defs
  • palm/trunk/UTIL/inifor/src/inifor_grid.f90

    r4790 r4808  
    2626! -----------------
    2727! $Id$
     28! Temporarily disabling dataset validation, enabling compatibility for HHL
     29!    fields without time dimension
     30!
     31!
     32! 4790 2020-11-18 13:05:58Z eckhard
    2833! Call dataset validation
    2934! Fixed error message
     
    597602! Section 3: Check for consistency
    598603!------------------------------------------------------------------------------
    599     CALL validate_dataset( flow_files, cfg%hhl_file )
     604    !CALL validate_dataset( flow_files, cfg%hhl_file )
    600605
    601606!
  • palm/trunk/UTIL/inifor/src/inifor_transform.f90

    r4756 r4808  
    2626! -----------------
    2727! $Id$
     28! Add offending height values to model-top error message
     29!
     30!
     31! 4756 2020-10-26 10:05:58Z eckhard
    2832! Fixed an error in surface pressure extrapolation where the cosmo grid was
    2933!    misinterpreted as palm grid
     
    11051109             palm_grid%w_verti(i,j,k,1:2) = - 2.0_wp
    11061110
    1107              message = "PALM-4U grid extends above COSMO-DE model top."
     1111             message =                                                         &
     1112                "PALM-4U grid extends above COSMO model top. " //              &
     1113                "Height of COSMO model top: " //                               &
     1114                TRIM( real_to_str( column_top, format = '(F11.3)') ) //        &
     1115                " m, height of current PALM point: " //                        &
     1116                TRIM( real_to_str( current_height , format = '(F11.3)') ) //   &
     1117                " m, height of PALM model top: " //                            &
     1118                TRIM( real_to_str( MAXVAL(palm_grid%z) + palm_grid%z0, '(F11.3)') ) // " m."
    11081119             CALL inifor_abort('find_vertical_neighbours_and_weights', message)
    11091120
     
    12461257             avg_grid%w(l,k_palm,1:2) = - 2.0_wp
    12471258
    1248              message = "PALM-4U grid extends above COSMO-DE model top."
     1259             message =                                                         &
     1260                "PALM-4U grid extends above COSMO model top. " //              &
     1261                "Height of COSMO model top: " //                               &
     1262                TRIM( real_to_str( column_top, format = '(F11.3)') ) //        &
     1263                " m, height of current PALM point: " //                        &
     1264                TRIM( real_to_str( current_height , format = '(F11.3)') ) //   &
     1265                " m, height of PALM model top: " //                            &
     1266                TRIM( real_to_str( MAXVAL(avg_grid%z) + avg_grid%z0, '(F11.3)') ) // " m."
    12491267             CALL inifor_abort('find_vertical_neighbours_and_weights_average', message)
    12501268
Note: See TracChangeset for help on using the changeset viewer.