Programming Language: OCaml

Change the function interp so it implements an interpreter,

------------

let v1 = Module [Expr (Num 789)]

let v2 = Module [Expr (BinOp (Num 8, Mult, Num 9))]

let v3 = Module [Expr (Num 7); Expr (Num 8)]

let v4 = Module [Expr (BinOp (BinOp (Num 7, Mult, Num 8), Add, Num 9))]

let interp (v : val) : int =

match v with ...