-- letter | number | special
lns :: Gen Word8
lns = frequency [(1, letter), (1, number), (1, special)]
lns :: Gen Word8
lns = frequency [(1, letter), (1, number), (1, special)]
lns = frequency [(1, letter), (1, number), (1, special)]