DEFINI gt (a, b) VT {
  REDI (a PLVS b)
}
DIC (ORDINA([II, V, I, III], gt))