(a:r)%0=r;(a:r)%n=a:r%(n-1)
d
[]=1;d
(f:r
)=foldr(\
(j
,x
)->(x
*d
(map(%j
)r
)-))0$zip
[0..]f
KGE6ciklMD1yOyhhOnIpJW49YTpyJShuLTEpCmRbXT0xO2QoZjpyKT1mb2xkcihcKGoseCktPih4KmQobWFwKCVqKXIpLSkpMCR6aXBbMC4uXWYKbWFpbj1pbnRlcmFjdCRzaG93LmQubWFwKG1hcCByZWFkLndvcmRzKS5saW5lcw==
LTU2MiAgIDQwICAgNDMgLTU4NiAgMzQ3Ci0yMjkgIDE3NyAgMzA1IC0zNjcgICA1MAotNDM0ICAzNDMgIDI0MSAtMzY1ICAtODYKLTMgICAtMzg0IC0zNTEgICA2MSAtMjE0Ci00MDAgICA5NiAtMzM5ICAgMjUgLTExNg==
-562 40 43 -586 347
-229 177 305 -367 50
-434 343 241 -365 -86
-3 -384 -351 61 -214
-400 96 -339 25 -116