Doppelfakultät
n:= n!!
k-fache Fakultät, analog zur Doppelfakultät
Clear[fk] n:= k:= fk[n_]:=fk[n]=n fk[n-k] fk[0]=1 Do[fk[i]=i,{i,1,k}]