PRO RdTapeDoc
;   -------------------------------------------------------------
;   -------------------------------------------------------------

    Print,'Calling Sequence for RdTap:
    Print,'---------------------------'
    Print,'IDL> rdtap, dev [,file, prefix = prefix, fileID = fileID,', $
        ' week = week,'
    Print,'                  dir =dir, range= range, software =software,'
    Print,'                 ,swpos = swpos, dpath = dpath, wpath = wpath]'
    Print, '--------------------------------------------------------'
    Print, 'WHERE:
    Print, 'dev     is the device name (Ex. for ultrix: "/dev/nrmt0h")'
    Print, 'file    is a list of filenames ', $
            '(e.g. sfr911029.0900, spr911029.1020,...).'
    Print, 'prefix  is a list of file prefixes: ada, bda, cba,', $
            ' hda, sfr, spr, wda.'
    Print, 'fileID  is a list of fileIDs:', $
            '(e.g. 911029.0900, 911127.1200, 911207.0230)'
    Print, 'week    is a list of weekly files to restore.'
    Print, 'dir     is a SWITCH to create the TAPE directory files on'
;   slf, syntax of next line corrected 21-may-92, (quote in quote) 
    Print, '        default dir or specified dir (e.g. dir="/yd/junk").'
    Print, 'range   is a SWITCH to create a list of files from input'
    Print, 'soft*   is a SWITCH to restore software tar file to disk.'
    Print, 'swpos   is a SWITCH to position tape to software tar file'
    Print, 'dpath   is the directory specification for restored data files'
    Print, 'wpath   is the directory specification for restored weekly files'
    Print, '    '
    Print, 'Examples:'
    Print, "rdtap, dev, ['spr911029.0300','bda911030.0440']"
    Print, '        restores the spr and bda files.
    Print, "rdtap, dev, prefix=['spr','sfr']  OR rdtape, dev, prefix='s'
    Print, '        restores all SXT files (i.e. sfr and spr) from tape!!!'
    Print, "rdtap, dev, fileId=['911029.0900','911029.1300']"
    Print, '        restores all archived files with these fileIDs!!!
    Print, "rdtap, dev, prefix='spr', fileId='911029.0200'"
    Print, '        restores just the spr911029.0200 file!!!'
    Print, "rdtap, dev, prefix='spr', fileId='911029.0200', week=['obs'], /dir"
    Print, '        restores the spr file, the observing log file, and', $
            ' tape directory.'
    Print, "rdtap, dev, week='all', wpath='/0p/mydirectory'"
    Print, '        restores all weekly files on tape to the directory:'
    Print, '        /0p/mydirectory'
    Print, "rdtap, dev, prefix='s', fileId=['910929.0200','911002.0900']", $
            ", /range"
    Print, '        restores sfr and spr files between the orbits 910929.0200', $
           '        and 911002.0900.'
    Print, "rdtap, week='all', /software"
    Print, '        decompresses the software archive file to the default', $
           '        directory and restores ALL weekly files.'
    Print, '        '
    Print, 'NOTE: When calling "rdtap" with "dev" at least ONE of the ',$
        'optional'
    Print, 'formal parameters must be included.'

    RETURN
    END