Support writing needed extension types

```clj
(true? 1)
=> false
(false? 1)
=> false
```