Idiomatic naming in libs

lib/bytes.tri

@@ -4,13 +4,13 @@
 nothing = t
 just = x : t x
 
-bytesIsNil = emptyList?
+bytesNil? = emptyList?
 
 bytesHead = matchList nothing (h _ : just h)
 
 bytesTail = matchList nothing (_ r : just r)
 
-byteEq = equal?
+byteEq? = equal?
 bytesLength = length
 bytesAppend = append
 
@@ -38,12 +38,12 @@ bytesDrop = n bytes : bytesDrop_ n 0 bytes
 
 bytesSplitAt = n bytes : pair (bytesTake n bytes) (bytesDrop n bytes)
 
-bytesEq = y (self xs ys :
+bytesEq? = y (self xs ys :
   matchList
     (matchList true (_ _ : false) ys)
     (xh xt :
       matchList
         false
-        (yh yt : and? (byteEq xh yh) (self xt yt))
+        (yh yt : and? (byteEq? xh yh) (self xt yt))
         ys)
     xs)