extern fint mtfsr_c(fint *,fint *);