Coastal & Marine Geology InfoBank

Home FACS Activities Atlas Geology School Related Sites More

USGS InfoBank program -- setdwindo

Skip navigational links
Loading
InfoBank Programs: by Name   by Topic  
Expanded Description
Topic Description
Name
setdwindo
Synopsis
/infobank/programs/plt/graphed/setdwindo.for
Description
  Subroutine to run the 'dwindo' PLOT-10 routine. 

       
COMMENTS
  If the window fill option is turned on then the y axis extent is determined

  from the extent of the data in the current time window. If the option is
  turned off then the y axis extent is the same for all time windows. Also, if
  the data is bathymetry, the y axis extent is set so that values run in
  ascending order from top to bottom. For all other data types, values run in
  descending order from top to bottom. This subroutine is called by and is
  internal to GRAPHED.
    
TO_USE
  call setdwindo (time, data, ldeleted, icount, istart, startime,

                  timespan, ymin, ymax, lfill, ywindomin, ywindomax)
  Input:
     time - array time in tenths of a second read from input file
     data - array of data read from input file
     ldeleted - array of logical indicating data points deleted
     icount - number of elements in arrays time, data, ldeleted
     istart - pointer to first array element in current time window
     startime - starting time of current time window in tenths of a
                second
     timespan - current length of x axis in tenths of a second
     ymin, ymax - bottom/top values for y axis, common to all time
                  windows
     lfill - indicates whether or not window fill option is turned on
  Output:
     ywindomin, ywindomax - bottom/top values for y axis for current
        time window
    
SUBROUTINES
  External PLOT10: dwindo

    
AUTHOR
  Ed Maple  4/13/87


    
Reads
Writes
              write (77, '(a,f,f)') 'in setdwindo2 ',
     *                ywindomin, ywindomax
Opens
Calls
          call dwindo (startime, startime + timespan,
     *                 ymin, ymax)
              call dwindo (startime, startime + timespan,
     *                     ywindomin, ywindomax)

Skip footer navigational links

Coastal and Marine Science Centers:  Pacific   St. Petersburg   Woods Hole  
InfoBank   Coastal and Marine Geology Program   Geologic Information   Ask-A-Geologist   USGS Disclaimer  


Accessibility FOIA Privacy Policies and Notices

Take Pride in America logo USA.gov logo U.S. Department of the Interior | U.S. Geological Survey
URL: http://walrus.wr.usgs.gov/infobank/programs/plt/graphed/setdwindo.doc.html
Page Contact Information: InfoBank staff
Page Last Modified: Mon Sep 16 03:39:20 PDT 2013  (chd)