Программа
FILTER предназначена для расчета коэффициентов линейных
фильтров, преобразующих трансформанту сопротивления T (или
кернел-функцию R) в кажущееся сопротивление ROK для установок
Шлюмберже, Веннера и ДОЗ.
Основа
программы взята из книги О.Куфуда "Электроразведка методом
сопротивлений" раздел 5.5, программа 5.5.1, стр.74-77.
В
основе алгоритма лежит следующая простая идея.
Если
линейный фильтр G позволяет рассчитать rК
по формуле:
![]() |
где
R - кернел-функция, а G - коэффициенты фильтра, то сам фильтр может
быть определен из условия минимума следующего функционала:
![]() |
где rК
- известная функция кажущегося сопротивления, а G - неизвестные коэффициенты
линейного фильтра. Условие минимума Ф:
![]() |
Вместо
функций R и rК
можно использовать их аналоги, связь между
которыми выражается такими же интегралами Ханкеля.
![]() |
а
вместо rК
функцию rК*:
![]() |
![]() |
Меняя
выходную функцию rК*,
можно рассчитать фильтры для других
установок: Веннера, ДОЗ, для потенциал - установки АМ и для установки
зондирования с линейными питающими электродами.
Для
установки Веннера аналог rК
имеет вид:
![]() |
Для
ДОЗ аналог rК
имеет вид:
![]() |
для
двухэлектродной потенциал - установки АМ:
![]() |
![]() Рис.1. Входная и выходные функции фильтра. |
![]() |
В
[1] приводятся и другие функции, являющиеся аналогами R
и rК.
Полученный
фильтр G должен обладать свойством, что сумма всех
его коэффициентов (с учетом знаков) должна быть равна 1.
Программа
5.5.1 из [1,
c.75] была запущена на IBM-PC аспирантом из Мадагаскара Ракутухани
Фалиманана Тринимандия весной 1991 г. Работа с программой
показала, что задание входных параметров по O.Куфуду весьма
неудобно. Поэтому программа была несколько переделана. Предусмотрена
возможность расчета фильтров не только для установки
Шлюмберже (S), но также Веннера (W), ДОЗ (D), потенциал установки
АМ (U) и установки с линейными электродами (L) (моделирование
на электропроводящей бумаге - чисто двумерное математическое моделирование
типа IE2DL), сделан более удобным набор входных параметров
и, главное, - диалог при подборе параметров фильтра по критерию
минимальной погрешности расчета и суммы коэффициентов фильтра
(в идеале=1). В диалоге удается получить фильтр с точностью
порядка 0.002%.
Программа
читает данные из FIL.DAT и пишет в FIL.PRO (фильтр) и
COMP.RES (оценка точности фильтра путем сравнения с эталонами rК,
рассчитанными через ряды).
В
1-й строке: KTM - число точек на декаду (от 3 до 14, обычно 5-8),
Файл
FIL.PRO предназначен для опробования фильтра, рассчитанного программой
FILTER с помощью другой программы (DVF, DVTEST или
написанной студентами), путем расчета конкретных кривых ВЭЗ и
сравнения их по точности с другим фильтром (DVTEST) для соответствующего
типа установки (KUST) или любым другим способом рассчитанной
кривой rК
(DVF2).
Программы
DVF, DVF2 читают фильтр из Файла FIL.PRO, а параметры
модели и разносы из DVF.DAT.
В
1-й строке: TEXT - сообщение о типе установки,
С
января 1993 г. запущена версия на Паскале, сочетающая расчет
фильтра с тестированием относительно 6 эталонных кривых для r1=1
и r2=0.01,
0.001, 0.0001, 100, 1000, 10000. На печать выдается
средняя погрешность по 12 разносам от 0.5 до 1024 м и максимальная
погрешность.
Создать
файл Fil.dat. Проверить, что тип установки, KF и KTM соответствуют
требуемым. Запустить Filter.EXE. На экране появится таблица.
|
|
|||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Первые
5 параметров в таблице можно менять. Для этого надо зайти
в соответствующую графу нижней таблицы и вместо старого значения
набрать новое. (Это лучше делать в режиме Ins Off (надпись вверху справа).
Если включен режим Ins On - переключите его
нажатием клавиши Insert.). После ввода нового значения пересчитайте
фильтр нажав F1. Оценками качества фильтра являются последние
две графы таблицы: Error и Summa. Error должна быть как можно
меньше, а Summa как можно ближе к единице.
Наиболее
эффективно влияющими параметрами в таблице являются Alfa
(сдвиг) и KL - количество коэффициентов предсказания от правого
края до центра фильтра. (Обратите внимание, что в рассчитанном
фильтре окажется число M - число коэффициентов памяти
от левого края до центра фильтра и M+KL+1=KF).
Меняя
KL выберите его значения, дающее минимум Error. Затем, меняя
Alfa следует получить минимум ошибки и одновременно минимум отличия
от единицы в Summa. Перебор вариантов помогает вести стек -
верхняя таблица, хранящая до 5 вариантов расчетов. Чтобы записать
вариант в стек нажмите Tab. Так как при выходе из программы
запоминается последний вариант расчета, то перед выходом
следует провести новый расчет лучшего варианта, если в стеке
он не последний.