Optimize `pm` macro

```ts
import { pm } from "@sthir/predicate/macro"

pm(x => f(x) ? [x] : []);
```

tranforms to

```ts
(t => (x => f(x) ? [x] : [])(t).length === 1);
```

but it could be optimized to

```ts
f;
```