Changeset 691 for palm/trunk/SOURCE/data_output_3d.f90
- Timestamp:
- Mar 4, 2011 8:45:30 AM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
palm/trunk/SOURCE/data_output_3d.f90
r674 r691 4 4 ! Current revisions: 5 5 ! ----------------- 6 ! Replaced simulated_time by time_since_reference_point 6 7 ! 7 8 ! Former revisions: … … 242 243 to_be_resorted => q_av 243 244 ENDIF 244 245 245 246 CASE ( 'ql' ) 246 247 IF ( av == 0 ) THEN … … 291 292 to_be_resorted => rho_av 292 293 ENDIF 293 294 294 295 CASE ( 's' ) 295 296 IF ( av == 0 ) THEN … … 298 299 to_be_resorted => s_av 299 300 ENDIF 300 301 301 302 CASE ( 'sa' ) 302 303 IF ( av == 0 ) THEN … … 305 306 to_be_resorted => sa_av 306 307 ENDIF 307 308 308 309 CASE ( 'u' ) 309 310 IF ( av == 0 ) THEN … … 408 409 !-- combine_plot_fields 409 410 IF ( myid == 0 ) THEN 410 WRITE ( 30 ) simulated_time, do3d_time_count(av), av 411 WRITE ( 30 ) time_since_reference_point, & 412 do3d_time_count(av), av 411 413 ENDIF 412 414 WRITE ( 30 ) nxlg, nxrg, nysg, nyng, nzb, nz_do3d
Note: See TracChangeset
for help on using the changeset viewer.