とりあえず作ってみよう

前にやった問題

をHaskellで考えてみよう。

とりあえず、ほしいのはこんなもの？

module Sort where

recordSort :: [Int] -> [(Int, Int)] -> [Int]
recordSort _ _ = []

ここからスタートだ！

一応mainもつくって期待通りに[]が表示されるのは確認

module Main where

import Sort

record = [(7, 345),
    (8, 678),
    (1, 123),
    (2, 456),
    (5, 567),
    (6, 812),
    (3, 781),
    (4, 234)]

target = [4, 5, 3, 1, 2]

main = print $ recordSort target record

肉付けしなきゃね