%I #15 Jan 30 2020 21:29:14
%S 0,1,2,6,48,480,5040,65520,1048320,18869760,377395200,8462361600,
%T 209802700800,5666588928000,165900288153600,5242466541312000,
%U 177718177308672000,6430828699975680000,247490157968621568000
%N E.g.f. ( 1-x-sqrt(1-2*x+x^2-4*x^3) )/(2*x^2).
%H INRIA Algorithms Project, <a href="http://ecs.inria.fr/services/structure?nbr=699">Encyclopedia of Combinatorial Structures 699</a>
%F D-finite with recurrence: a(1)=1; a(3)=6; a(2)=2; a(4)=48; (-56*n^2-26*n^3-12-46*n-4*n^4)*a(n) +(n^3+7*n^2+16*n+12)*a(n+1) +(-13*n-2*n^2-21)*a(n+2) +(n+5)*a(n+3) =0.
%p spec := [S,{B=Prod(C,C),S=Union(B,Z,C),C=Prod(S,Z)},labeled]: seq(combstruct[count](spec,size=n), n=0..20);
%K easy,nonn
%O 0,3
%A encyclopedia(AT)pommard.inria.fr, Jan 25 2000