cond(1,"Слабый блеск").
cond(2,"Большое количество дефектов").
cond(3,"Поверхность на 2/3 дефективна").
cond(4,"Хороший блеск").
cond(5,"Дефекты менее чем на 2/3 площади").
cond(7,"Дефекты менее чем на 1/3 поверхности").
cond(8,"Видимые дефекты отсутствуют").
cond(9,"Незначительные повреждения до 10% площади").
cond(10,"Прекрасно блестит и сияет").
cond(11,"Форма близка к идеальной").
cond(12,"-").
cond(13,"Средние показатели перламутровых переливов").
cond(14,"Зерна примерно одного уровня качества").
cond(15,"Практически идеальная форма").
cond(16,"Отличный блеск").
cond(17,"Плотный, яркий перламутровый слой").
cond(18,"-").
cond(19,"Все жемчужины примерно одного класса качества").
cond(20,"Сферическая форма").
cond(21,"Высокие показатели блеска").
cond(22,"Толстый, насыщенный, яркий перламутровый слой").
cond(23,"Не более 5% повреждений на поверхности").
cond(24,"Каждая жемчужина принадлежит к одному высокому классу качества").
cond(25,"Безупречная форма").
cond(26,"Блеск безупречный").
cond(27,"Толстый перламутровый слой без повреждений").
cond(28,"Жемчужины практически идеально повторяют друг друга в плане качества").

rule("Качество поверхности D", [1,2,3]).
rule("Качество поверхности C", [4,5]).
rule("Качество поверхности B", [4,5,7]).
rule("Качество поверхности A", [5,7,8,9,10]).
rule("Совмещенная классификация А", [4,11,13,14]).
rule("Совмещенная классификация АА", [9,15,16,17,19]).
rule("Совмещенная классификация АА+", [20,21,22,23,24]).
rule("Совмещенная классификация ААА", [25,26,27,28]).