Более одного совпадения в операторе case в Erlang?

У меня есть такой кусок кода:

case sth of
    {a, 1} -> doA();
    {a, 2} -> doA();
    {a, 3} -> doB()
end.

Есть ли способ не повторять часть «doA ()»? Я думал, что это должно быть легко, но я не мог найти ответ в Google.