> List.map2 (+) [1;2;3] [3;2;1];;
val it : int list = [4; 4; 4]