SHOW:
|
|
- or go back to the newest paste.
| 1 | let y1 = [1; 2; 3; 4; 5] | |
| 2 | - | let y2 = ['a'; 'b'; 'c'; 'd'; 'e'] |
| 2 | + | let y2 = [10; 11; 12; 13; 14] |
| 3 | let rec Comb = function | |
| 4 | - | a1::b1 a2::b2-> a1::a2::Comb(b1 b2) |
| 4 | + | (a1::b1, a2::b2) -> a1::a2::Comb (b1, b2) |
| 5 | - | printfn "%A" (Comb y1 y2) |
| 5 | + | printfn "%A" (Comb (y1, y2)) |