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

RETURN,0.5*(X EQ 0) + (X GT 0)
END