Ltac f H := split; [ a H | e H ]
Ltac g := match goal with
          | |- context [if ?X then _ else _] => case X
          end