
10.8 Реалиэщия частотно-минимального метода
Если RV - О, то /-Ю строку переписываем в матрицу термов ITERM,
проверив предварительно, не склеивалась ли данная (-я строка с предыду-
щими строками с 1-й по (i~l )-ю. При сравнении /-Й иу-й строк в случае
склеивания номеру запомнится в одномерном массиве KR, на позиции под
номером 17. Проверка осуществляется путем поиска номера ; в массиве KR
по позициям от
1
до 17 текущего.
8. Если после работы подпрограммы POISK признак OR
==
1, то подпро-
грамма PO/SK выполняется еще раз, но здесь работаем в подпрограмме с
матрицей IX, а переписываем в матрицу 1Y. Если после этого шага OR = 1,
то еще раз вызывается подпрограмма POISK, но проводится перезапись из 1Y
в IX. Эш проводится до тех пор, пока признак OR = 1. Чтобы на этом этапе
выполнения npoi раммы избежать зацик/швания, вводится переменная NRAZ,
она фиксирует количество обращений к подпрограмме POISK. Как только
оно превысит заведомо большое число (100), то печатается сообщение
ОШИБКА В ITERM
и
выполнение программы заканчивается.
Ч. /12 = /И ) 1,
Л/1
=
Л/
+
1.
Параметры /12 и Л/1 описывают матрицу покрытия IQ. Истинный раз-
мер матрицы IQ (П
I
ХМ), кроме этого необходимы дополнительные строка
и с (олбец для обозначения номеров строк и столбцов матрицы 1Q.
10.
Вызов подпрограммы QPOKR.
С помощью этой подпрограммы формируем матрицу покрытия IQ.
Мафнца образуется по следующему правилу,
q^^
=
1
— если г-й минтерм
входит в состав / неминимального терма; qjj =0 — в противном случае.
11.
Вызов подпрограммы MULTR.
С помощью этой подпрограммы формируется матрица F*^^, при этом
I-я строка IQ умтюжается на себя и попарные произведения суммируют-
ся,
получаем элемент /ц , затем 1-ю строку умножаем на 2-ю, 3-ю и т. д.,
I-IO на /! !, получаем элементы /,2, /п, ••-, //и
•
Затем 2-(р на 2-ю, 2-ю на
3-ю, 2-ю па 4-10, ...,
/11x711.
Это элемент /цц,,. Размер матрицы F"
равен /11
X
/11.
12.
Вызов подпрограммы OBNUL.
С помощью этой подпрограммы проводится вычеркивание (обнуление)
CI
рок
ма1
рицы IQ вплоть до /12 элемента.
Собсгветию обнуление проводит программа NR, которая вызывается
|юлпрограммой OBNUL. Подпрограмма OBNUL указывает номер строки,
которую ттеобходимо обнулить. Поиск такой строки осуществляется сле-
дующим образом:
253