(make-instance 'urel :cui1 cui :aui1 (ensure-integer aui1) :stype1 stype1 :rel rel
:cui2 (ensure-integer cui2) :aui2 (ensure-integer aui2) :stype2 stype2
:rui (ensure-integer rui) :srui srui :rela rela :sab sab :sl sl :rg rg :dir dir
(make-instance 'urel :cui1 cui :aui1 (ensure-integer aui1) :stype1 stype1 :rel rel
:cui2 (ensure-integer cui2) :aui2 (ensure-integer aui2) :stype2 stype2
:rui (ensure-integer rui) :srui srui :rela rela :sab sab :sl sl :rg rg :dir dir