let finite_domain (flags: flags) = get_flag_bool flags.flags FL_FiniteDomain