LET ZMIN = MINIMUM _2
LET ZMAX = MAXIMUM _2
LET ZLOW = ZMIN - 0.5
LET ZUPP = ZMAX + 0.5
@IF 6 0 BAR FILL _5
TITLE _7
Y1LABEL _8
X1LABEL _9
RELATIVE HISTOGRAM _1 _2
LIMITS FREEZE
.
@IF 4 0 LINES _4
@IF 5 0 LINE COLOR _5
LET ZSHAPE = _3
PRE-ERASE OFF
PLOT ZETPDF(X,ZSHAPE) FOR X = ZMIN  1 ZMAX
LIMITS
PRE-ERASE ON
