in ocaml language

Write a function zipwith : ('a -> 'b -> 'c) -> 'a list -> 'b list -> 'c list such that zipwith f 11 12 generates a list whose ith element is obtained by applying f to the ith element of 11 and the ith element of 12 . If the lists have different lengths, the extra elements in the longer list should be ignored. For example, zipwith (+) [1;2;3] [4;5] [5;7] . = : let rec zipwith f 11 12 = (* YOUR CODE HERE *)