- •Головная программа
- •2. Управляющие подпрограммы
- •3. Подпрограммы генерирования реализации сп
- •3.2. Автономная подпрограмма istok1
- •4.1. Автономная подпрограмма razm1
- •6. Подпрогратя расчета статистически корреляционных моментов сп
- •6.1. Автономная подпрограмм коrm1
- •6.2. Автономная подпрограмма kormm
- •7.1. Автономная подпрограмма korf1
- •7.2. Автономная подпрограмма korf2
- •7.5. Автономная подпрограмма - функция func1
- •8. Подпрограмма расчета статистических hoрмированных функций спектральной плотности
- •8.1. Автономная подпрограмма formf1
- •8.2. Автономная подпрограмма spid1
- •8.3. Автономная подпрограмма spid2
- •8.4. Автономная подпгограмма spidm
- •8.5. Abtoномная программа spin1
- •9. Подпрогрмма расчета статистических функций плотности вероятности сп
- •9.1. Автономная программа formx1
- •9.2. Автономная программа formxm
- •9.3. Автононяая подпрограмма gist1
- •9.4. Автономная подпрограмма gist2
- •9.5. Автономная программа gistm
- •10. Подпрограммы расчета заданных /теоретических/ статистических характеристик сп
- •10.1. Автономная подпрограмма test1
- •11. Подпрограммы анализа точности
- •11.1. Автономная подпрограмма anal1
- •12. Запуск ппп.
7.5. Автономная подпрограмма - функция func1
Данная подпрограмма-функция написана на алгоритмическом языке ФOPTPAH-4 и предназначается для вычисления текущего значения оптимизируемого функционала при решении задачи об оптимальной аппроксимации статистической корреляционной функции.
Обращение к подпрограмме-функции имеет вид:
F = FUNC1(X,N).
Здесь:
Х (3) - массив оптимизируемых параметров / и /;
N - число оптимизируемых параметров: ;
F - значение оптимизируемого функционала.
Часть информации, необходимой для вычисления оптимизируемого функционала, передается в подпрограмму через СOMON-блок с именем RОКОRF:
/ROKORF/ JR0, NRO, DT, ROST (100) , ROAP (100)
Здесь:
JR0 - признак типа аппроксимационной зависимости: ;
NRO - число узлов дискретизации корреляционной функции
RОSТ(NRO)- массив дискретизированной нормированной статистической корреляционной функции ;
ROAP(NRO)- массив дискретизированной нормированной корреляционной функции , рассчитанной по аппроксимацонной зависимости.
Тип формулы для расчета функции определяется величиной признака :
при
при
при
при
Расчет оптимизируемого функционала в подпрограмме производится по формуле:
.
8. Подпрограмма расчета статистических hoрмированных функций спектральной плотности
Подпрограммы, включенные в данный раздел пакета, предназначаются для выполнения следующих операций:
расчета шкалы частот для функций спектральной плотности /подпрограмма FORMF1/;
расчета дискретизированной статистической нормированной функции спектральной плотности одномерного /скалярного/ СП по дискретизированной корреляционной функции этого процесса /подпрограмма SPID1/;
расчета дискретизированных авто- и взаимных статистических нормированных функций спектральной плотности двух одномерных /скалярных/ СП по дискретизированным корреляционным функциям этих процессов /подпрограмма SPID2/;
расчета дискретизированных авто- и взаимных статистических нормированных функций спектральной плотности составляющих многомерного /векторного/ СП по дискретизированным корреляционным функциям этого процесса /подпрограмма SPIDM/;
расчета дискретизированной статистической нормированной функции спектральной плотности одномерного /скалярного/ СП по квадратурным интегральным зависимостям из числа заданных /подпрограмма SPIN1/.
8.1. Автономная подпрограмма formf1
Данная подпрограмма написана на алгоритмическом языке ФОРТРАН-4 и предназначается для проведения операций, связанных с формированием шкалы аргумента функции спектральной плотности СП.
Обращение к подпрограмме имеет вид:
CALL FORMF1(F1, MAFI,NSPEK).
Здесь:
FI(NSPEK) - шкала аргумента функции спектральной плотности СП;
MAFI(2) - массив параметров, определяющих границы шкалы аргумента функции спектральной плотности MAFI(1) - ,MAFI(2) - , /;
JSРЕК - число узлов дискретизации функции спектральной плотности.
Выполнение операции формирования шкалы аргумента функции спектрально- ной плотности в подпрограмме производится по формуле:
,