cont_int_fold_test.ml

let a a0 a1 a2 a3 a4 = 

  (((((1 + a0) + a1) + a2) + a3 ) + a4) + 2 

let b a0 a1 a2 a3 a4 = 

  (((((1 + a0) + a1) + a2) + a3 ) + a4) + (((((1 + a0) + a1) + a2) + a3 ) + a4)