Kronecker Product Mathematica. I would like to define such a function: Thus the Kronecker produ