Changeset 769 for palm/trunk/SCRIPTS/NCL/timeseries.ncl

Timestamp:

Oct 26, 2011 2:20:45 PM (13 years ago)

Author:

heinze

Message:

Bugfixes in case of plot of t=0h and plot of topography zusi/zwwi possible

File:

• palm/trunk/SCRIPTS/NCL/timeseries.ncl (modified) (4 diffs)

palm/trunk/SCRIPTS/NCL/timeseries.ncl

@@ -195 +195 @@
    delta_t = t_all(nt-1)/nt
 
+   if (nt .LE. 1) then
+      print(" ")
+      print("Input file contains only one time step -> " +\
+            "plot of timeseries is not possible ")
+      print(" ")
+      exit
+   end if
+
    ;****************************************************        
    ; start of time step and different types of mistakes that could be done
@@ -228 +236 @@
          st=i
          break
+       else
+         st=0
       end if
    end do
@@ -233 +243 @@
        start_time_step .LT. t_all(nt-1)) then
       st=nt-2   
-   end if
-   if (.not. isvar("st"))then
-      print(" ")
-      print("'start_time_step' = "+ start_time_step +"h is invalid")
-      print(" ")
-      print("Select another 'start_time_step'")
-      print(" ")
-      exit
+    else
+      st=0
    end if
       
@@ -286 +290 @@
          et=i
          break
+       else
+         et=0
       end if
    end do 
-   
-   if (.not. isvar("et"))then
-      print(" ")
-      print("'end_time_step' = "+ end_time_step +"h is invalid")
-      print(" ")
-      print("Select another 'end_time_step'")
-      print(" ")
-      exit
-   end if
  
    delete(start_time_step)