>  Docs Center  >  Libraries  >  Coyote  >  PRINTPATH

PRINTPATH

PRINTPATH

Name


      PrintPath

Purpose



      This is a utility program for printing the IDL path in a simplied
      format for easy browsing.

Author


      FANNING SOFTWARE CONSULTING
      David Fanning, Ph.D.
      1645 Sheely Drive
      Fort Collins, CO 80526 USA
      Phone: 970-221-0438
      E-mail: david@idlcoyote.com
      Coyote's Guide to IDL Programming: http://www.idlcoyote.com

Category



      Utilites

Calling Sequence



      IDL> PrintPath

Inputs



      filename: The name of the output file. If not present, the output is
                written into the command log window.

Keywords



      None.
     

Modification History



      Written by David W. Fanning, 8 Nov 2007.
      Added FILENAME parameter, 9 July 2012. DWF.
******************************************************************************************;
  Copyright (c) 2008, by Fanning Software Consulting, Inc. ;
  All rights reserved. ;
                                                                                          ;
  Redistribution and use in source and binary forms, with or without ;
  modification, are permitted provided that the following conditions are met: ;
                                                                                          ;
      * Redistributions of source code must retain the above copyright ;
        notice, this list of conditions and the following disclaimer. ;
      * Redistributions in binary form must reproduce the above copyright ;
        notice, this list of conditions and the following disclaimer in the ;
        documentation and/or other materials provided with the distribution. ;
      * Neither the name of Fanning Software Consulting, Inc. nor the names of its ;
        contributors may be used to endorse or promote products derived from this ;
        software without specific prior written permission. ;
                                                                                          ;
  THIS SOFTWARE IS PROVIDED BY FANNING SOFTWARE CONSULTING, INC. ''AS IS'' AND ANY ;
  EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES ;
  OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT ;
  SHALL FANNING SOFTWARE CONSULTING, INC. BE LIABLE FOR ANY DIRECT, INDIRECT, ;
  INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED ;
  TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; ;
  LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ;
  ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT ;
  (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS ;
  SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. ;
******************************************************************************************;
RO PrintPath, filename
  parts = StrSplit(!PATH, Path_Sep(/SEARCH_PATH), /Extract)
 
  IF N_Elements(filename) NE 0 THEN BEGIN
 
      OpenW, lun, filename, /Get_Lun
      FOR j=0L,N_Elements(parts)-1 DO PrintF, lun, parts[j]
      Free_Lun, lun
     
  ENDIF ELSE FOR j=0L,N_Elements(parts)-1 DO Print, parts[j]
 
ND



© 2019 Harris Geospatial Solutions, Inc. |  Legal
My Account    |    Store    |    Contact Us