Changeset 337 for palm/trunk/SOURCE

Timestamp:

Jun 10, 2009 1:21:14 PM (16 years ago)

Author:

raasch

Message:

documentation for using dvr; bugfix for last revision

File:

• palm/trunk/SOURCE/header.f90 (modified) (1 diff)

palm/trunk/SOURCE/header.f90

@@ -1623 +1623 @@
             '       Directory:        ',A// &
             '       The sequence contains:')
-361 FORMAT ('       Isosurface of ',A,'  Threshold value: ', E12.3/ &
-            '       Isosurface color: (',F4.2,',',F4,2,',',F4.2,') (R,G,B)')
-362 FORMAT ('       Slicer plane ',A/ &
+361 FORMAT (/'       Isosurface of "',A,'"    Threshold value: ', E12.3/ &
+            '          Isosurface color: (',F4.2,',',F4.2,',',F4.2,') (R,G,B)')
+362 FORMAT (/'       Slicer plane ',A/ &
             '       Slicer limits: [',F6.2,',',F6.2,']')
-363 FORMAT ('       Particles'/ &
+363 FORMAT (/'       Particles'/ &
             '          particle size:  ',F7.2,' m')
 364 FORMAT ('          particle ',A,' controlled by "',A,'" with interval [', &
                        F6.2,',',F6.2,']')
-365 FORMAT (/'       Groundplate color: (',F4.2,',',F4,2,',',F4.2,') (R,G,B)'/ &
+365 FORMAT (/'       Groundplate color: (',F4.2,',',F4.2,',',F4.2,') (R,G,B)'/ &
             '       Superelevation along (x,y,z): (',F4.1,',',F4.1,',',F4.1, &
                      ')'/ &
             '       Clipping limits: from x = ',F9.1,' m to x = ',F9.1,' m'/ &
             '                        from y = ',F9.1,' m to y = ',F9.1,' m')
-366 FORMAT (/'       Topography color: (',F4.2,',',F4,2,',',F4.2,') (R,G,B)')
+366 FORMAT (/'       Topography color: (',F4.2,',',F4.2,',',F4.2,') (R,G,B)')
 367 FORMAT ('       Polygon reduction for topography: cluster_size = ', I1)
 #endif