Done. See 3c5be7bbbcc3949d84224e4f9a9fe6ad3ebeb364.

```haskell
tjm :: ToJSON a => a -> Maybe a -> Value
tja :: ToJSON a => Maybe a -> [Value]
(|||) :: ToJSON a => [Value] -> Maybe a -> [Value]
```