\START92\
\COMMENT=
\NAME=defchidf
\FILE=DEFCHIDF.9XP
()
Prgm
\(C)\ keine Parametervorgabe, def. y3(x)
EntfVar y3
Definier y3(x)=when(x>0,m*x^(1.5)*\e\^(\(-)\x/2)/(3*\root\(2*\pi\)),0)
ZeiStil 3,"Line"
EndPrgm
\STOP92\