import Control.Monad

getInts :: IO [Int]
getInts = map read . words <$> getLine

solve [t1, x1, y1] [t2, x2, y2]
    | t < d        = False
    | even (t - d) = True
    | otherwise    = False
    where d = abs (x1 - x2) + abs (y1 - y2)
          t = t2 - t1

main = do 
    n <- read <$> getLine :: IO Int
    c <- replicateM n getInts
    let x = [0, 0, 0] : c 
    let ans = and $ zipWith solve x (tail x)
    putStrLn $ if ans then "Yes" else "No"
    
