Changeset 518 for palm/trunk/SCRIPTS


Ignore:
Timestamp:
Mar 18, 2010 8:40:53 AM (15 years ago)
Author:
heinze
Message:

Bugfix concerning variable time_stride

File:
1 edited

Legend:

Unmodified
Added
Removed
  • palm/trunk/SCRIPTS/NCL/profiles.ncl

    r513 r518  
    10111011   ; ****************************************************
    10121012 
    1013    if(time_stride .LT. 1)
     1013   if (time_stride .LT. 1) then
    10141014      print(" ")
    10151015      print("'time_stride' has to be positive and is set to 1")
     
    10181018   end if
    10191019
    1020    if(time_stride .GE. no_time)
     1020   if (time_stride .GE. no_time) then
    10211021      print(" ")
    10221022      print("'time_stride' is greater equal than number of available time steps,")
    1023       print("only start time step will be plotted then")
    1024       print(" ")
    1025       time_stride = no_time
     1023      print("=> 'time_stride' is set to 1")
     1024      time_stride = 1
    10261025   end if
    10271026
     
    17541753            end if
    17551754         end if         
    1756          
    1757          
     1755
    17581756         if (abs(min(data(varn,:,min_z_int:max_z_int))) .GT. 10)then
    17591757            min_value = abs(0.001*min(data(varn,:,min_z_int:max_z_int)))
     
    17751773            end if
    17761774         end if
     1775       
    17771776         if (min(data(varn,:,min_z_int:max_z_int)) .EQ. 0 .AND. \
    17781777             max(data(varn,:,min_z_int:max_z_int)) .EQ. 0)then
Note: See TracChangeset for help on using the changeset viewer.