Haskell案例的语法较短？

-- 定义一个函数，接受两个参数并返回它们的和
sumOfTwoNumbers :: Int -> Int -> Int
sumOfTwoNumbers x y = x + y

-- 定义一个数据类型，表示一个学生的姓名、年龄和成绩
data Student = Student {name :: String, age :: Int, grade :: Int}

-- 定义一个名为main的函数，该函数接受一个Student类型的参数student，并输出该学生的姓名、年龄和成绩
main :: Student -> IO ()
main student = do
  -- 输出学生的姓名
  putStrLn (name student)
  -- 输出学生的年龄
  putStrLn (show (age student))
  -- 输出学生的成绩
  putStrLn (show (grade student))