2017-03-08 13 views
0
私はトレースのトラブルを抱えている

トレース:は(正しいです)。このコードをOCamlの再帰関数

let rec prepend (l: int list list) (x: int) : int list list = 
     begin match l with 
      | [] -> [] 
      | hd :: tl -> (x :: hd) :: (prepend tl x) 
     end 

prepend [[]; [2]; [2;3]] 1 = [[1]; [1;2]; [1;2;3]] 

私のトレースが正しくありませんが、私は間違っているかわからないんだけど:

prepend ([]::2::[]::2::3::[]::[]) 1 = 
1::[]::prepend (2::[]::2::3::[]::[]) 1 = 
1::[]::1::2::prepend([]::2::3::[]::[]) 1 = 
1::[]::1::2::1::[]::prepend(2::3::[]::[]) 1 --> 
This is incorrect because then it comes out as [1] ; [1;2;1] 
when it should be [1]; [1;2] ; [1;2;3] 

答えて

1

::演算子は結合型ではありません。すなわち、(a :: b) :: ca :: (b :: c)と同じではありません。だからあなたはあなたのサブリストを追跡するために括弧を使うべきです。

prepend ([] :: (2 :: []) :: (2 :: 3 :: []) :: []) 1 => 
(1 :: []) :: prepend ((2 :: []) :: (2 :: 3 :: []) :: []) 1 => 
(1 :: []) :: (1 :: 2 :: []) :: prepend ((2 :: 3 :: []) :: []) 1 => ... 

たぶん、あなたは、私は今それを理解

+0

....そこからそれを取ることができ、ありがとうございました! – user

関連する問題