Changeset 291 for palm/trunk/SOURCE/data_output_ptseries.f90
- Timestamp:
- Apr 16, 2009 12:07:26 PM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/data_output_ptseries.f90
r263 r291 4 4 ! Current revisions: 5 5 ! ----------------- 6 ! simulated_time in NetCDF output replaced by time_since_reference_point. 6 7 ! Output of NetCDF messages with aid of message handling routine. 7 8 ! … … 55 56 ! 56 57 !-- Update the particle time series time axis 57 nc_stat = NF90_PUT_VAR( id_set_pts, id_var_time_pts, &58 (/ simulated_time /),&58 nc_stat = NF90_PUT_VAR( id_set_pts, id_var_time_pts, & 59 (/ time_since_reference_point /), & 59 60 start = (/ dopts_time_count /), count = (/ 1 /) ) 60 61 CALL handle_netcdf_error( 'data_output_ptseries', 391 )
Note: See TracChangeset
for help on using the changeset viewer.