計算機科学のブログ

型の紹介 型の基礎 空リスト、head関数とtail関数の型シグネチャ

入門Haskellプログラミング (Will Kurt(著)、株式会社クイープ(監修、翻訳)、翔泳社)のUNIT2(型の紹介)、LESSON 11(型の基礎)、11.5(練習問題)Q11-2の解答を求めてみる。

tail関数の型はシグネチャ [a] -> [a]だから、空のリストで呼び出された時に空のリストを返すtail関数を作成することは可能。

一方、head関数の型シグネチャは [a] -> a だから、空のリストで呼び出された時に空のリストを返すhead関数を作成することはできない。

コード

lesson/app/Main.hs

module Main where

import Lib
  ( myTail,
  )

main :: IO ()
main = do
  mapM_ print $
    [ myTail [1],
      tail [1],
      myTail [1 .. 10],
      tail [1 .. 10],
      myTail [],
      tail []
    ]

lesson/src/Lib.hs

module Lib
  ( myTail,
  )
where

myTail :: [a] -> [a]
myTail [] = []
myTail (x : xs) = xs

入出力結果(Terminal, Zsh)

% stack build
lesson-0.1.0.0: unregistering (local file changes: app/Main.hs src/Lib.hs)
lesson> configure (lib + exe)
Configuring lesson-0.1.0.0...
lesson> build (lib + exe)
Preprocessing library for lesson-0.1.0.0..
Building library for lesson-0.1.0.0..
[2 of 2] Compiling Lib
Preprocessing executable 'lesson-exe' for lesson-0.1.0.0..
Building executable 'lesson-exe' for lesson-0.1.0.0..
[2 of 2] Compiling Main
Linking .stack-work/dist/x86_64-osx/Cabal-3.4.1.0/build/lesson-exe/lesson-exe ...
lesson> copy/register
Installing library in /Users/…/lesson/.stack-work/install/x86_64-osx/7091f650d3dd5d7cbe41c419933d22622a88b13592d474a4616bbcad00d1cf98/9.0.2/lib/x86_64-osx-ghc-9.0.2/lesson-0.1.0.0-CIOIkpTgcfQI9akDJnwnSd
Installing executable lesson-exe in /Users/…/lesson/.stack-work/install/x86_64-osx/7091f650d3dd5d7cbe41c419933d22622a88b13592d474a4616bbcad00d1cf98/9.0.2/bin
Registering library for lesson-0.1.0.0..
% stack exec lesson-exe
[]
[]
[2,3,4,5,6,7,8,9,10]
[2,3,4,5,6,7,8,9,10]
[]
lesson-exe: Prelude.tail: empty list
% ghci
GHCi, version 8.10.7: https://www.haskell.org/ghc/  :? for help
macro 'doc' overwrites builtin command.  Use ':def!' to overwrite.
(0.00 secs, 0 bytes)
(0.00 secs, 0 bytes)
Loaded GHCi configuration from /Users/kamimura/.ghc/ghci.conf
Prelude
λ> :t head
head :: [a] -> a
Prelude
λ> :t tail
tail :: [a] -> [a]
Prelude
λ> :quit
Leaving GHCi.
%