\START92\
\COMMENT=
\NAME=deftrels
\FILE=DEFTRELS.9XP
()
Prgm
\(C)\ keine Parametervorgabe, def. y4(x)
EntfVar y4
Definier y4(x)=Summe(Folge(when(x\>=\k-1 and x<k,laltss[k],0),k,2,Dim(laltsx)-1,1))/m+when(x\>=\Dim(laltsx)-1,1,0)
ZeiStil 4,"Dot"
EndPrgm
\STOP92\