SHOW:
|
|
- or go back to the newest paste.
| 1 | - | let y1 = [1; 2; 3; 4; 5] |
| 1 | + | // Task 2 |
| 2 | - | let y2 = [10; 11; 12; 13; 14] |
| 2 | + | let x1 = [ ('a',1); ('b',2); ('c',3); ('d',4) ] // (<масть>,<достоинство>)
|
| 3 | - | let rec Comb = function |
| 3 | + | let rec search = function |
| 4 | - | | (a1::b1, a2::b2) -> a1::a2::Comb (b1, b2) |
| 4 | + | x1 |> List.filter (fun x -> x='a') |
