Coastal & Marine Geology InfoBank

Home FACS Activities Atlas Geology School Related Sites More

USGS InfoBank program -- findpoint

Skip navigational links
Loading
InfoBank Programs: by Name   by Topic  
Expanded Description
Topic Description
Name
findpoint
Synopsis
/infobank/programs/plt/graphed/findpoint.for
Description
  Subroutine to find the closest data element to the point picked by the user.

       
COMMENTS
  It assumes that the PLOT10 subroutine 'vcursr' was called and that the user

  picked a point on the display using the crosshairs. Only the x axis values
  (time) are matched. Y axis values (data) are ignored. This subroutine is
  called by and is internal to GRAPHED. It is also called by the GRAPHED 
  subroutines; showxy, delete, and restore.
    
TO_USE
  call findpoint (time, ldeleted, icount, istart, startime, timespan, xtime,

                  ltruefalse, jpoint)
    
  Input:
    time - array of time in real tenths of a second from the input file
    ldeleted - array of flags indicating whether an array element has been 
               deleted
    icount - number of items in the arrays
    istart - pointer to the first array element in the current time window
    startime - starting time for current window in tenths of a second
    timespan - width of the x axis in real tenths of a second
    xtime - time in tenths of a second of point picked by the user
    ltruefalse - logical condition desired for point picked
  Output:
    jpoint - pointer to array element most closely matching xtime:
             time (jpoint) is closest or equal to xtime
    
SUBROUTINES
  This subroutine calls no other subroutines.

    
AUTHOR
  Ed Maple  2/20/87


    
Reads
Writes
Opens
Calls

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/findpoint.doc.html
Page Contact Information: InfoBank staff
Page Last Modified: Mon Sep 16 03:39:19 PDT 2013  (chd)