theorem Th32: :: HILB10_4:32

for n being Nat
for i1, i2 being Element of n holds { p where p is b₁ -element XFinSequence of NAT : p . i1 = (p . i2) ! } is diophantine Subset of (n -xtuples_of NAT)