assert_is_formula(x, severity = getOption("assertive.severity", "stop"))
assert_is_one_sided_formula(x, severity = getOption("assertive.severity", "stop"))
assert_is_two_sided_formula(x, severity = getOption("assertive.severity", "stop"))
is_formula(x, .xname = get_name_in_parent(x))
is_one_sided_formula(x, .xname = get_name_in_parent(x))
is_two_sided_formula(x, .xname = get_name_in_parent(x))