Changeset 288


Ignore:
Timestamp:
Apr 9, 2009 11:20:12 AM (13 years ago)
Author:
heinze
Message:

NetCDF unit attribute in timeseries output added, typographical error in modules fixed

Location:
palm/trunk
Files:
4 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/DOC/tec/message_identifiers

    r274 r288  
    602602
    603603    assigned               free
    604        1 -  346             347
    605      348 -  375             376
     604       1 -  375             376
    606605     377 -  428             386
    607606    1009 - 1010
  • palm/trunk/SOURCE/CURRENT_MODIFICATIONS

    r278 r288  
    2828Changed:
    2929-------
     30NetCDF unit attribute in timeseries output in case of statistic regions added
     31(netcdf.90)
     32
    3033Output of NetCDF messages with aid of message handling routine.
    3134(check_open, close_file, data_output_2d, data_output_3d,
     
    6063------
    6164
     65Typographical error: unit of wpt in dots_unit (modules)
     66
    6267Bugfix: error in check, if particles moved further than one subdomain length.
    6368This check must not be applied for newly released particles. (advec_particles)
     
    7681on. (time_integration)
    7782
    78 advec_particles, check_parameters, cpu_log, init_particles, time_integration
     83advec_particles, check_parameters, cpu_log, init_particles, modules, time_integration
  • palm/trunk/SOURCE/modules.f90

    r284 r288  
    55! Actual revisions:
    66! -----------------
     7! typographical error in dots_unit fixed
    78! +clip_dvrp_*, cluster_size, color_interval, dvrpsize_interval, dvrp_overlap,
    89! dvrp_total_overlap, groundplate_color, local_dvrserver_running, n*_dvrp,
     
    857858          (/ 'm2/s2  ', 'm2/s2  ', 's      ', 'm/s    ', 'K      ', 'm/s    ', &
    858859             'm/s    ', 'm/s    ', 's-1    ', 's-1    ', 'm      ', 'm      ', &
    859              'm/s    ', 'K m/s  ', 'K m/s  ', 'k m/s  ', 'K      ', 'K      ', &
     860             'm/s    ', 'K m/s  ', 'K m/s  ', 'K m/s  ', 'K      ', 'K      ', &
    860861             'm2/s2  ', 'm2/s2  ', 'kg m/s ', 'm      ',                       &
    861862             ( 'unknown', i9 = 1, 78 ) /)
  • palm/trunk/SOURCE/netcdf.f90

    r277 r288  
    77! Current revisions:
    88! ------------------
     9! NetCDF unit attribute in timeseries output in case of statistic
     10! regions added.
    911! Output of NetCDF messages with aid of message handling routine.
    1012! Output of messages replaced by message handling routine.
     
    26842686                   CALL handle_netcdf_error( 'netcdf', 257 )
    26852687
     2688                   nc_stat = NF90_PUT_ATT( id_set_ts, id_var_dots(i,j), &
     2689                                           'units', TRIM( dots_unit(i) ) )
     2690                   CALL handle_netcdf_error( 'netcdf', 347 )
     2691
    26862692                   var_list = TRIM(var_list) // TRIM(netcdf_var_name) // &
    26872693                              suffix // ';'
     
    36263632       message_string = TRIM( NF90_STRERROR( nc_stat ) )
    36273633
    3628        CALL message( routine_name, message_identifier, 2, 2, -1, 6, 1 )
     3634       CALL message( routine_name, message_identifier, 2, 2, 0, 6, 1 )
    36293635
    36303636    ENDIF
Note: See TracChangeset for help on using the changeset viewer.