Выдержка из текста работы
Для построения графиков используется графическая библиотека пакета DISLIN (http://www.mps.mpg.de/dislin/) – набор графических подпрограмм и функций, которые в представленном варианте адаптированы подOpen Watcom Fortran 1.7а (http://www.openwatcom.org/index.php/Main_Page). Несмотря на наличие собственной графической библиотеки уOpen Watcom Fortranс достаточным для визуализации научных расчетов количеством примитивов, затраты времени на их освоение и использование не всегда удовлетворяет пользователя.
Для работы актуальной версии пакета требуется наличие среды Open Watcom Fortran 1.7а (Пуск→Программы→ Open Watcom FortranIDEили дискc:\ директорияc:\WATCOM\binnt\ide.exe) и файла diswfl.lib (который, как правило, находиться в директорииkaf14\Fort_project на сетевом дискеz:\).
Начать работу в оболочке Open Watcom Integrated Development Environment (IDE) следует с создания нового проекта. Для этого в меню IDE нужно выбратьFile→NewProject. В появившемся окне следует открыть директорию, отведенную для вашей группы на сетевом диске, где создать папку с собственным именем (например MYDIR) и файл проекта типаmyname.wpj и нажать ОК. В рабочей области Open WatcomIDEпоявится окно цели проекта (NewTarget), где вы нажимаете OK, чтобы согласиться с заданным по умолчанию именем цели ( такое же, как и у проекта -myname ) и типом выходного приложения (Character-modExecutable–exe). В рабочей области появиться новое, пока ещё пустое, окноmyname.exe.
В созданную вами на сетевом диске директорию необходимо с помощью проводника или любыми другими средствами (не средствами Open Watcom IDE) скопировать файлы diswfl.lib иGraphic.for
Далее следует снова вернуться в Open Watcom IDEи вставить в проект скопированные вами файлы из вашей директории (SourcesNewSourcez:\ MYDIR\ diswfl.lib иz:\ MYDIR\Graphic.for). В окне проекта появятся соответствующие файлы.
Для просмотра и редактирования исходного файла, выделите его с помощью мышки и в меню SourcesвыберитеEditTextили дважды щёлкните мышью по выбранному файлу. Перед вами откроется окно текстового редактора Open Watcom Editor с содержимым выбранного файла.
OpenWatcomFortranсоответствует стандарту Fortran77, поэтому необходимо строго придерживаться правил размещения операторов, меток и т.д. в строке (оператор начинается с 7 колонки, метки с 1 по 5, знак комментария ‘с’ — в первой колонке и т.д.).
Чтобы откомпилировать исходный файл в Open WatcomIDEв меню Sources выберитеMake(F3) или щелкните мышкой по соответствующей пиктограмме в меню ( при наведении курсора на пиктограмму, в нижней части окна появляется соответствующая подсказка).
Если компиляция завершилась успешно (без ошибок), то можно запустить редактор связей (меню Targets→Make(F4) или соответствующая пиктограмма), который соберёт выполняемый модуль (myname.exe.) с подсоединенной графической библиотекой diswfl.lib. При отсутствии ошибок на стадии редактирования, будет создан исполняемый файлmyname.exe.
Запуск программы осуществляется из меню Targets→Run(CTRL+R) или соответствующей пиктограммой. Кроме того этот файл может запускаться любым другим способом, пригодным для запуска исполняемых файлов в ОС Windows.
Файл Graphic.forпредставляет собой исходный текст простейшей программы, рисующий график синуса и косинуса. В качестве массивов для хранения абсцисс и ординат точек будущего графика использованы следующие:
XRAY(N) – абсциссы кривых;
Y1RAY(N) – ордината первой кривой на графике;
Y2RAY(N) — ордината второй кривой на графике;
где N– число точек в каждом массиве ( в данном примереN=100).
Название графика и осей задаются в массивах TITL(2)*22 и AXIS(2)*6 типа CHARACTER длиной 22 и 6 символов соответственно.
График строится на отрезке [0,π]. Построение графика осуществляется вызовом подпрограммы SUBROUTINEGRAF_1, в которую передаются значения соответствующих переменных
CALL GRAF_1(XRAY,Y1RAY,Y2RAY,N,AXIS,TITL)
Используя данную программу как образец, необходимо построить график заданной в вашем задании функции.
Примечание.
Если исходные данные заданы лишь для одной кривой, то она одна и появится на графике.
