use PDL::MatrixOps;

print det $C;