hlint complaints
use bit lenses