Viewing contents of file '../idllib/ghrs/pro/astrolib.pro'
PRO ASTROLIB,DUM
;+
; NAME
;    ASTROLIB
; PURPOSE:
;    Add the system variables in use in the IDL Astronomy User's Library
; CALLING SEQUENCE:
;    ASTROLIB
; INPUTS:
;    None.
; OUTPUTS:
;    None.
; METHOD:
;    The system variables !PRIV, !DEBUG, !TEXTUNIT, and !TEXTOUT are added.
; REVISION HISTORY:
;    Written, Wayne Landsman, July 1986.
;    Use DEFSYSV instead of ADDSYSVAR           December 1990
;-
ON_ERROR,2
DEFSYSV,'!DEBUG',0
DEFSYSV,'!PRIV',0    
DEFSYSV,'!TEXTUNIT',0
DEFSYSV,'!TEXTOUT',1 
MESSAGE,'Astronomy Library system variables have been added',/INF
RETURN
END