infelicity in comparison methods

[RobinHankin]

library("frab")
#> 
#> Attaching package: 'frab'
#> The following object is masked from 'package:graphics':
#> 
#>     symbols
(x <- frab(c(x=5,a=3,d=6)))
#> A frab object with hash 25076b3f8c2dbd97d18146872eb27d08034b8dab and entries
#> a d x 
#> 3 6 5
x ==  3
#> A disord object with hash 25076b3f8c2dbd97d18146872eb27d08034b8dab and elements
#> [1] "a"
#> (in some order)

^{Created on 2023-07-11 with reprex v2.0.2}

[RobinHankin]

But

library("frab")
#> 
#> Attaching package: 'frab'
#> The following object is masked from 'package:graphics':
#> 
#>     symbols
(x <- frab(c(x=5,a=3,d=6,u=2)))
#> A frab object with hash 74cef67c869cf27b1f6691a7d5a4c82d100640a0 and entries
#> a d u x 
#> 3 6 2 5
x[x>2]
#> Error in .local(x, i, j = j, ..., drop): hotblack

^{Created on 2023-07-11 with reprex v2.0.2}