Types

QDivByZeroDefect = object of ArithmeticDefect

Quaternion = ref object of RootObj
  r*, ci*, cj*, ck*: float

UnitQuaternion = ref object of Quaternion