fixed is_ar function