FUNCTION GAUS,X
;+
; FUNCTION GAUS,X
; Computes the standard GAUS function for any list of values represented
; by the vector x. See Gaskill, Page 47.
;
; USAGE:
; x=FINDGEN(1001)/20-25 CREATE A VECTOR ON THE INTERVAL [-25,25]
; y=GAUS((x-8)/5) Construct a function that is shifted and stretched
;
; HISTORY
; Written by Harvey Rhody, September 1997
;-

RETURN,EXP(-!PI*X^2)
END