obtain H t=t by [t|_] done
[obtain id | conclude term] = term by [ term | _ [(auto_params)]] [done]
Da Fare