Create irndCompact.q

A more compact version of irnd.q