check if a matrix is a scalar
[ret]=is_scalar(x)
* x = a (nxm) matrix
* ret0 = 1 if x is scalar, 0 in other cases
is_scalar(5) //returns 1 is_scalar(ones((4,1)) //returns 0.