     [ drop 16 <byte-array> 16 <byte-array> \ A boa ]
     [ N bad-length ]
     if ; inline
-
-M: A equal? over \ A instance? [ sequence= ] [ 2drop f ] if ;
 
 M: A c:byte-length drop 32 ; inline
 


M: A length drop N ; inline

M: A nth-unsafe underlying>> A-rep simd-nth ; inline

M: A set-nth-unsafe

    [ drop 16 <byte-array> \ A boa ]
    [ N bad-length ]
    if ; inline

M: A c:byte-length underlying>> length ; inline

