Changeset 769 for palm/trunk/SCRIPTS/NCL/spectra.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/spectra.ncl (modified) (2 diffs)

palm/trunk/SCRIPTS/NCL/spectra.ncl

@@ -323 +323 @@
          st=i
          break
+      else
+         st=0
       end if
    end do
-   
-   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
-   end if
    
    ;****************************************************
@@ -367 +360 @@
          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)