;-------------------------------------------------------------
;+
; NAME:
;      ANGSTROM
; PURPOSE:
;      This function, if called, returns a string containing 
;      the vector drawn signature of the angstrom symbol.
; CATEGORY:
;      TEXT STRING ROUTINES
; CALLING SEQUENCE:
;      sang = angstrom()
; INPUTS:
;      NONE
; KEYWORD PARAMETERS:
; OUTPUTS:
;      sang = A scalar string containing the vector drawn
;        signature of the angstrom symbol.
;        type: scalar,string
; COMMON BLOCKS:
; NOTES:
; MODIFICATION HISTORY:
;       H. Cohl,  2 Apr, 1991 --- 
;-
;-------------------------------------------------------------

function angstrom,help=help 

  angstrom='!SA!R!U!9 % !N!X'
  sang=string(angstrom)

return,sang

end