simOrtho function

Simulate Random Orthogonal Matrix