) [] (map (uncurry $ map. flip (,)) (zip [1..] opsByPrec))
maxPrec = length op
getprec2 = foldl (++) [] (map (uncurry $ map. flip (,)) (zip [1..] opsByPrec))
getprec2 = foldl (++) [] (map (uncurry $ map. flip (,)) (zip [1..] opsByPrec))