funcF FUNCTION RN1,D6
.055,7./.138,8./.305,9./.499,4./.722,5./1,6.
funcC FUNCTION FN$funcF,D6
4,200/5,98/6,178/7,79/8,94/9,181
TABLEF TABLE P2,0,1,15
TABLEC TABLE P3,0,5,8
GENERATE 5
ASSIGN 2,FN$funcF
ASSIGN 3,FN$funcC
TABULATE TABLEF
TABULATE TABLEC
TERMINATE 1
START 10000