- (sn> s1 s2 #!key (bits (current-serial-bits)))procedure
- (sn< s1 s2 #!key (bits (current-serial-bits)))procedure
- (sn<= s1 s2 #!key (bits (current-serial-bits)))procedure
- (sn>= s1 s2 #!key (bits (current-serial-bits)))procedure
- (sn= s1 s2 #!key (bits (current-serial-bits)))procedure