View difference between Paste ID: ShtRpS3u and 2cBiWzut
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))