idAs m (a,b) = show a ++ replicate (m - length a + 2) ' ' ++ "identified as  " ++ show b
idAs m (a,b) = show a ++ replicate (m - length a + 2) ' ' ++ "identified as  " ++ show b
idAs m (a,b) = show a ++ replicate (m - length a + 2) ' ' ++ "identified as  " ++ show b