Changeset 375 for palm/trunk/SCRIPTS/NCL

Timestamp:

Sep 1, 2009 9:19:32 AM (15 years ago)

Author:

heinze

Message:

Bugfix in profiles.ncl concerning plots with logarithmic axis

File:

• palm/trunk/SCRIPTS/NCL/profiles.ncl (modified) (1 diff)

palm/trunk/SCRIPTS/NCL/profiles.ncl

@@ -1727 +1727 @@
          end if
 
-         if(max_z_int .gt. dimz-1)
+         if (max_z_int .gt. dimz-1)
             max_z_int = dimz-1
+            if (log_z .EQ. 1) then
+             max_z_int = max_z_int - 1
+            end if
          end if
 
-         if(min_z_int .lt. 0)
+         if (min_z_int .lt. 0)
             min_z_int = 0
+            if (log_z .EQ. 1) then
+              min_z_int = min_z_int + 1
+            end if
          end if