Cleanup primop constant folding rules in a few ways

 - `leftZero`, `rightZero` and `zeroElem` could all be written using `isZeroLit`

 - "modulo 1" rules could be written with `nonOneLit 1 $> Lit zero<type>`

All are due to @hsyl20; thanks!