NMRWish TCL Library Procedures getQuadSize: Return 1 if the given dimension is real-only, 2 if complex.