rec := (32858200 + 11197935*n + 828539*n^2)*a[n] +
 (-83090130 - 40642646*n - 4009948*n^2)*a[1 + n] + 
 (5170470 + 17680361*n + 3181409*n^2)*a[2 + n]
