gistfile1.txt

case AdminRoles -- Roles of
        AdminRoles -> % same list, not an admin role
            case AdminNames -- [Name] of
                AdminNames -> % same names, not an admin
                    throw({unauthorized, <<"You are not a db or server admin.">>});
                _ ->
                    ok
            end;
        _ ->
            ok
    end.