The default simplification tactic used by Program is defined by program_simpl, sometimes auto
is not enough, better rebind using ObligationTactic:=tac in this case,
possibly using program_simplify to use standard goal-cleaning tactics.