Coastal & Marine Geology InfoBank

Home FACS Activities Atlas Geology School Related Sites More

USGS InfoBank program -- showcol

Skip navigational links
Loading
InfoBank Programs: by Name   by Topic  
Expanded Description
Topic Description
Name
showcol
Synopsis
/infobank/programs/util/showcol/showcol.for
Description
  Program to list by column different characters found in all fields.

       
COMMENTS
  Maximum record length is 5000.

    
PROMPTS
  Enter input  file name:

  Enter output file name:
    
SUBROUTINES
  openem   (external shareable)

    
AUTHOR
  Clint Steele         .for         12/17/84

     
  modified to terminate after more than 10 variable records 
    - CDegnan 2/5/85
  Added documentation on prompts for help file - EMaple  2/7/85
  corrected for MAT detected problems -- CSteele  2/12/85
  modified to not terminate, just stop notifying after 10 changes
    - CSteele 3/20/85
  added handling of "!" header records

    
Reads
          read (90, 1, end = 99) length, (aline(i), i = 1, length)
Writes
                  write (91,55) lastrec, length, icount 
                      write ( 91, 56 )
      write (91, 77) filnam
      write (91, 789) HeadCount
      write (91,10)
          write (91, 2) linsiz(kcount), kcount, 
     *                  (aline(i), i = 1, imon - 1)
Opens
Calls
      call openem (1, -1)

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