false_rec : [`a, `b] `a -> `b
main : string