$a = new Math::Matrix ([1], [2], [3]);
$x = new Math::Matrix ([4], [5], [6]);

$f=new Math::Matrix([1, 2, 3],[4, 5, 6]);
$f=$f->cross_product;