Введение в технологию программирования. Часть 3. Проект OLYMPUS-D. Коржов Е.Н - 55 стр.

       После этого производится объявление использованных данных в мо-
дуле DECLAR, так как все входные данные являются глобальными дан-
ными. В соответствии с принятыми правилами имена данных следуют по
алфавиту, каждое данное с комментарием о его назначении и указанием
соответствующего имени типа записывается в отдельной строке.


unit DECLAR;
{
  Назначение: Описание нестандартных типов данных и объявление гло-
               бальных данных
   Автор: Фамилия Имя Отчество, организация, подразделение
   Версия: 01.01
   Дата; 20.11.07
}
interface

var
 Alfa                      {Угол наклона полости} : real;
  Beta       {Коэффициент теплового расширения} : real;
 BVal_W     {Способ вычисления вихря на границе} : byte;
 Cp                {Удельная теплоемкость среды} : real;
  EndCal                      {Конец вычислений} : boolean;
 EndExp {Завершение компьютерного эксперимента} : boolean;
 Eps                       {Точность вычислений} : real;
 H                               {Высота полости} : real;
 L                              {Ширина полости} : real;
  Lamda         {Коэффициент теплопроводности} : real;
 MaxIter          {Максимальное число итераций} : integer;
 My                       {Коэффициент вязкости} : real;
 NumMet              {Метод численного решения} : byte;
 Nx               {Число узлов сетки вдоль Х-оси} : word;
 Ny              { Число узлов сетки вдоль У-оси } : word;
 Relax                      {параметр релаксации} : real;
 Ro                            {Плотность среды} : real;

implementation

end.



                                   55