��������� �������� ������� � �������, ������������ � �������������.
������� � ��������� �������� (��������, ����� � �����), ������� ��������������� ������������ ��� ���������� ����� ��� �������� ���������� �����.
������ � ����������� ������������� �������, ������ �������� �����������, ���������� ��� �������������� ���������, ������� ��������� ������� � �������� ���������, �������� � �� �������, ��������, ���������, �������, �������� � ��������.
��������� ������� � ��������� ����������, ������� �������� ��� ����������, ����������� ��� �������� ������� ������� � ����� �����.
������ � ����� ������� ��� ��������� � �������, ������� ������ ���� ����������� � ������ � ����� ���� (��������, ������������� ����������, ������, ������).
�������� ��� �������� �������� ������� ������� (��������, ��������� ���������� �������, ������� �������� ���������� ����� � ����).
������ ��������� (���������� ��� ���������) ��������� ��������, ������������� ��������� ���������� �������� (��������, ��� �������, ����������� � ��������� ����� � ������� ��������, ����������� �� �������� ������� ������, ������ ����������� ��� �� ����������).
������� � ��������� ����������� ��������� ��������� ������� (��������, �������� ������ ����������).
����������� � ������� � ������ �������, ������� ���������� � ������ ������� ��� � ��������� ������� ������� ������ c ������� ���������� �������, ������������ ��� ��������� ������� (������ ������ �������� ��� ������� � ����� �������).
������ ������� � ������ ���������� ������� �������, ������������� �� ������� �������������, ��������� ����� ��� ������ ������� ������� (���).
�������� � ����������������� ������� ���������� ���������� (��������, ����� ������������ ��� ����� ����� ������������� ������), ��� �������� ��������, ����� ��� ���������� � ������������� (���� ��� ����� ���� ���������� � �������� ��������������� �������������).
�������� � ����������������� ������� ��������������� ����������, ��� �������� ���������� �������, ����� �� ������������� (��������, �������� ������� � ������� �� ������� ���������� ������ � ������ �����������, ��� ��� ������ ������������ ������� �� ������� �����������).
��������� ����� ��������������� ������������ ��������, ���������� ������� ������� � ������������ ������.
���� � ����������, ���������� ���������� ������� �������������, ���������� � �������� ���� (CLOCK).
���������-���������� ������������� � ������������� ������� � ���������� ������� �������, ����� ���������� �������, ���������� ������������������ ��������� ��������� ������� �� �������. � ���������� ����� ������������� ����� �������� ������������. ��������������� ����� ������� ������������, �� ���� ���������� �� �������. ������� ��������� �������, �������� �������� � ����� �������� ��������, ����������, �������� � �������� � ��� ��� ������� ������� � ��������� ���������� � �������� �������������.
��� CMO c ����� ����������� ������������ ��������� ����� ����������� ���������� � ����� ��� ������������ �����������. ������ ������������ � ��� �������� �������, ������� ������� �� ��������� ������� (����� ��� ��������) � ����� ����������, ������������ � �������. �������� ������ �������� �������� ���������, � �� ����� ��� �������� �������� ����������� ���������. ���������� ����� ����� ����� ������������� ���������� � ����� ������������ ��������. ���������� �������� � �������, ����� ���������� ��������� ��������, ��� ���������� ������� � ��� ���������� ����������� � �������. ��������, ���������� ���������� �������� c ���������� ������� � ������ ������, �������� �������������� ������� �������� �� ������ �������, ����� ��������� ������� �������� ��������� ����������. ��������� �������� ������ �������� �������� ��� ��������� ��������, �� ����� ������� �� ������������ � ��������������� ������������ � �������� � �� ���������� � ���.
������.���������� ����, ��� ���� �������, � ������� ���� �������� � �� �� ������. ���� ��������� ���������� ������� �������� ���������, �� �������� ���������� ���������� � ��� ������������. �������� ��������� � ��������� ��������. ���� �������� ����� ������������� ���������� � � ��� ����� �������� ������ (������) ����������, �� ��� ���������� � ����� ������� � ��������. ����� �������� �������� ������������, �� �� ��������� � ��������� ���������.
���� � ������� ���� ����������, �� �������� ��������� ��� ������������ ������� ���������� �� �������. ������� ����������� �� �������. ��� ��������� ���������� � �������, ���� ��� ����, ������������ �� ���� ������� ������. ���� � ������� ��� �����������, �� �������� �������� � ��������� ���������� �� ������� ����������� ����������.
� ����. 1.1 ������������ ��������� ������� ����� ��������� ����������� � ������� � ���������� ��������� �� ������������ ���������,��� ���. 1.3 ��������� ����������� ������� ������� ������������� CMO c ����� �����������.
C ����� ������ ���������� ������� ������� ������������ �������� � ���������� (����������) � ��������� ������ � ���������� ������������ (����������� ������ ��������), ������� ��� ����������. ���� ���������� ���������� �� ������,��� �����, �� ��� ���������� � ������� � �������. ������� ����� ���� ��������� �������� ��� ������ �������, ��������� c ��������. ������ �� ������� ������������ � FIFO.
� ���������� | 7 | |
����� �����������, | ||
����� ������������, | � | � |
��� ������ ���� ����������� � ������ �� ����� ����������, ��� ����� ���������� j ����� ������������ ������ R, �.�. ���������� ���������� �������� �������, ����� ���������� j �������������� R � ����� ��� ������������� ������. ������, ������ ��� ������ ����� �������� ���������� j, �� ������ ���� ��������. � ����� ������ ���������� ����� ������� � ������� �� ���������� �������.
������ �������� ������ ������� c ����� ������ ����������� ����� ����������, �.�. �� ������� ��� ������� � ������� �� ������� ������ �� ��������. ��� ��� ���������� ���������� �������� � ������� �� ���������� ���������� ������� ������� ���������� �� �������� (�����, � ������� �������� ������������ �������), �� ���������� ���������� ����� ����������� ����� �� �������� � ������ (��������� � ��������� ������� ������� � ������� �� ������� � �������). ��� ��������� ����������� ���������� ������������ ������������ ��������� (� ����� GPSS ���� ������������ ������������� ���� GENERATE). �������� �� ������ ���������:
1. ������� ������������ ������ ���������� � ���� ��������� ������, ���������� � ���� ����: ����� ���������� � j, ������ ��� ������� � ,������ ��� ������������� �������� ���������� ��� ��� �������� (��������, ��� ���������). ������������� ������� � ������ ���������� j �� ������ ������� � �.�. ������� ����������� � ������� � ���.
2. ������������� ��������� ������� ��� ���������� j � ������-���������� ������� R (��������) �� ������ ������� . ������������� ������ ���������� ������������� ������� ���������� j+ 1, �.�. ���������� ������� ������� ���������� ���������� : = + .
�������� �������� ������������� ������� ����������� ������������� ������� �� ��� ������������.
������ � ��� ������-���������� ������� R ���������� j (� ����� GPSS ���� ������������ ������������� ���� SEIZE).�������� �� ������ ���������:
1. ���� ������ R (��������) ����� ���� ����� �������� ���������� j, �� �������� ��������� ������� R �� ��������. ��������� ������ ������ ������������ ���������� ti+l � . �������� ���������� ������������ ������������ ���������� j.
2. ���� ������ R �������, �� ��������� ���������� j � ������� � ������� R.
������ ������������ � ������������ ���������� j (� ������ GPSS ���� ������������ ������������� ���� ADVANCE). Ee �������� ������ ����� ������� � ���������� ������� ������ ������������ ���������� Nj ��� tj � = tj � + tj �� (��� tj �� � ����� ������������ � ����������). �.�. ��������� ����������� � ������� � ��� ��� �������� ���������� ������������ ������������ ������� R ����������� j.
������ ������������ � ������������ ������� R ����������� j (� ����� GPSS ���� ������������ ������������� ���� RELEASE). �������� �� ������ ���������.
1. �������� ��������� ������� R (��������) �� ����������. �������� ���������� ������������ ����������� ����������.
2. ���������, ���� �� ���������� � ������� � ������� R? ���� ����, �� ������� ���������� �� ������� � ������������� ��� ���� ������� ������-���������� ������� R.
������������ ����������� ���������� (� ����� GPSS ���� ������������ ������������� ���� TERMINATE) ���������� ��� ����������� ��������� ������ ������� ����������. ���� ���������� �� ����������, �� �� �������� ��� ���������� ������ ����������.
����� ������������� ����������� ���������� ��������� ���������� ��������� ������������� (���), ������� ��������� ������� ������������� � ����������� �������� ������� ���������� �� ������ ����� ������ ��������� ����������� ��������� �������. ������ ���������� ���� ��������� � ����� ������ ������������� �� ������� ������� ��� � ���������� ���� ���������� ������� �� ������� � �������. � ����� GPSS ������� ��� ��������� ���������-������������� (����������).
������ ������� ������� �������� ��� ����������� ��� ��������, ������� ���� ��������, ����� ��������� � ������� �������. �������� ����������� ������� �������������, �������������, ��� ��� ������� ���������� � ���������� ��������������� �������, ������� �� ���.
������������ �������� ������� ��������, ��� � ������ ������ �������� ��� ����������������� ����������� ��� ������������ (��������, �� ��������� ��������������� �������������), ����� ���������� ����� ����� �������� � ������� ��� ������� ������ c ��� �������� � ���. � �������� ���� ����������� ������� ������� �� ��������, ��� ������ ���������� (���, ��������, ��������� ������� ������������ ��� ��������� ����������� �����������). � ������ ����� ��������� ������� ������������ ������ ���������� ��������, ������� ������������� �� ������� ��������� �����.
� ����� ������ ����� ������������� t1 � ��� �������� ��� �������������� ���������� ������� ������� � ��������� c ����� ��������� ������� t1 � , t2 � . � ��� ������� ����������� � ��������������� ������� �� �������, �� ���� ������� ������� ������������� ��������
����� t � �������� ����� � ������� �������� ������� �������������. �������, ��������� �� �������� t1 � , ���������� ����������� ��������, �� ���� ��� ��������� �������, ������� ����������. ����� ����, ��� ������������ ��������� ������� ����� = t � �� ����� ������������� ���� ��������������, ���� ������������ �� ������� ������������� ���� = t1 � , ����������� ���������� ������� ��������� �� ��� � ����������� ������������ �������. ���������� ������������ ������������ ������� ��������, ��� ���������� ����� ��������� ������� � ������� ������� t1 � , ������� ������� �� ��������� ������� ��������� ������ �� ����� t � � ��������� ������������ �������. �� ����� t � ����� ������� ������� ����� ��������� ��� �� ���������, �� ���� ����� �� ��� ��������, �� ��������� ���������� ������� � ���������� � ��������������� ������� � ���. ����� ����, ��� ����� ����������� ��������� ������� � ������� ������� t1 � ���� ��������������, ���� ������������ �� ������� ������ ������������ �������, � ����������� ������������ ����� �������. ����� ������� ����������� �� ��������� ��������. �� ���. 1.4 �������� ����������� ����� ������������ ������.
� ������ ������ ������������� (����� ������������� t � =�) ��� �������� ���������� ������������ ���������, ������� ���������� ������ ������� ������� ���������� � �������� ������� ������-���������� ������� R � ��� �� ����� t1 � = t1 �� . ��� ��� ������ ������� � ������� ���, �� ���� ����������� �� �������� ������� t1 � , ���������� ������������ ��������� � ������������ ������-���������� ������� R.
������������ ��������� ���������� ������� ������� (������ ������� ������� ���������� t2 �� ) � �������� ��� ������� � ��� �� ����� t2 �� .
������������ ������-���������� ��������� ��������� ������� (��������). ��� ��� ������ R ���������, �� �� ����������� ������� ���������� � ��������� ������� R ���������� �� ���������. ������������ ������ ������ ������������ ���������� t1 � . ���������� ���������� ������������ ������������ ���������� 1.
������������ ������������ ���������� ������� ����� ������������ ���������� 1, ��� t1 � = t1 � + t1� � , �.�. ��������� ����������� � ������� ������� � ��� ��� �������� ���������� ������������ ������������ ������� R ����������� 1 �� ����� t1 � .
����� �������, � ��� ������� ��� �������� � ���� c ���������� �������� ��������� ���������� 2 �� ����� t2 �� ,������� c ���������� �������� ��������� ������������ ���������� 1 �� ����� t1 � . ���� ����� t2 �� � , �� ���� ����� ���������� �� ����� t2 � = t2 �� , �. e. ����� ����� ������� ������������ ��������� � ������������� ��������� ���������� 2. � ���� �� ������ ������� t2 � ���������� ����� ������������ ���������, ������� ������� � ��� ��������� ���������� 3 �� ����� t3 �� � ����� ������������ ������-���������� ������� R, �� ��� ��� ������ ����� ������������� ���������� 1, �� ���������� 2 ����� ��������� � ������� � ������� R.
� ��� ����� �������� ��� �������� � ���� ��� ����������� ������� ��������� ���������� 3 �� ����� t3 �� ,������� c ���������� �������� ��������� ������������ ���������� 1 �� ����� t1 r . ���� ����� t3 �� > t1 r , �� ���� ����� ���������� �� ����� t3 � = t1 � , �.�. � ����� ������� ������������ ������������ ������� R ����������� 1. ��� �������� ��������� ������� R (��������) �� ���������� � �������� ���������� ������������ ����������� ����������. ����� ��������, ���� �� ���������� � ������� � ������� R, � ������� ���������� 2 �� �������, ������� ��� ���� ������� ��� ������������ ������-���������� ������� R.
��������� � ��� �� ��������� ����� t3 � ������������ ����������� �������� ��������� ������ (������ ������ �� �����) ��� ���������� 1. ��� �� ������������ ��� ������������� ����� �� ��������� ����� ���������� ���������� 1 � �������, ��� t3 �� = t3 � � t1 �� , ��� ���������� �������������� ������ ������� ���������� ����������� � �������.
� ���������� ��������� ���� ������ ����������� � ������� ����� ����������� �� ���������� ���� ���������.
�������� �������� ������ �� ��������� �������� �������������. �������� ��� ��������:
1. ����� ������ ������� ��� ����������, ��������������� �����������, ��������, 100 �����������. � ���� ������ � ��� ����� ������������ ����������, ������, ���������� �� ����� �� ������ ����������� �������.
2. ���� ����� ����������� �� ���������� �� ��������� (��������, ������������ �������������� ������������� �����), �� ������������� ����� ��������� ����� ����������� ����� ������ ������������� ���������� �����������, ��������, 1000. ��� ����� � ������������ ����������� ���� ��������� ������� ����������� � ���������� ������������� ����� 1000 �����������. � ����� GPSS ����� ������� ������������ � ������� START, ������� �������� ������� �������������.
3. ���������� ��������������� ������ ������� � ������� ��������� ������� �������, ��������, 480 ���. � ���� ������ ����� ��� ������ ����������� ����� ���������� ������� t ��������� ��������� �������� ������� �� ��������� 480. ��� ������ �������� ���������� ������� ����� ������ ��� ����� 480, ���������� ���������� �������������. ������ ����� ������ ���������, ��� ��� ����� ������ ��������� ������ ������ ��-�� �������� �������. ������� ������ ��������� ��������� �������. ���������� ����������� ����������-������ c ������� ��� ����� ������������ ��������� c ���������� �������� ����� � ������ t m = 480. ����������-������ ����� ��������� ����� �� ������������ � ��� ���� ������������ �����������, � ������� ������ ������� ���������� �� �������. �� ����� �������� ���������� �������������. � ���� ������ � ��� ����� ��� ����� ���������� ������� ��� ����������-������� �� �������� ����������� ������� 480. ��� ������ ��� ������� ������ ����������� ����������, ���� ����� ���������� �� ����� 480 � ������������� �����������.
� �������� ������������� ������ ���������� �������������� ���������� � ������ ������ ��� ������ ����������� ����� ���������� �������. ����� ����������� ����� ���� �������� �������, ����� ���������� � ������� � ���������� ������������, �������� ����������, ��������� ������� � ������ ���������. ��� ����� ���� ���������� ������ ��������� ������������ ���������� ����������, ������� ����������� �� � �� ��������� ������������� ������ ����������� �������������� �����. � ����� GPSS ����� �������������� ���������� ������������� � ��������� �������� ��������� (���) � �������� � �������� ������������� ������ �� ����������. ������ � ��� ���� ����������� ��������� ��������� �������� ����������, ��������, ������������ ������ ��� ����� ���������� � �������.
� ���� ����� ���� ������ ����������� ������������� �� ������� ������� CMO. � ����� GPSS ������ ������������ ����� ������� ���������, ��������� � ��������� 4.22.
�� ����� ��, ��� ������? �������������� �������:
Интернет-сервис Студворк построен на передовых, современных технологиях и не поддерживает старые браузеры. Для просмотра сайта загрузите и установите любой из следующих браузеров:
���������� ���������-���������� ������: ���������� � ��������� (���������, ����������������, ������������, ���������). �������� ���������-���������� ��������: �����; ����������� � �������� �������; ������������; ���������� ����� ��������; �������������.
������� | ����������������, ���������� � ����������� |
��� | �������� ������ |
���� | ������� |
���� ���������� | 23.01.2014 |
������ ����� | 31,2 K |
��������� ���� ������� ������ � ���� ������ ������. ����������� �����, ������������� ����
��������, ���������, ������� ������, ������������ ���� ������ � ����� ����� � ������, ����� ��� ����� ����������.
��������� �� http://www.allbest.ru/
����������� ��������� �� ����������� ��
��������� ��������������� ���������������� �����������
�� ����: "��� ������� � ����������� �������������"
��������: ��. ��. 7030
��������� ��� ������� � ����������� ������������� � ������ ���������� ���� ���� �������� ��������� – ����������, ������������ ����������� � ���������-���������������.
��� ���������� ������� �������� ��������� ������������ � �������� �������� �������� ��� ��������� �������. �� ���������, ���������, �������� ���������� � ���, ��� ����� ���������� ��� ���������� �������.
������������ ����������� – ��� ������ ����������� ������� ������������� ����������� (��������������) ������� ����� �������� ���������� ����������� ������� � ������� ����� ������� ������������� �������.
���������-��������������� ������ ������������� ������� ����������� ����� ����������� ������� ��������� �������� ����������� (����������), � �������� �������� �� �������������� ������ ��������. ��� ����������� ����������� ����� ��������, � � ���� ���������� ����� �������.
���������� �������� �������� ������
��� ���������� ���������-���������� ������ ���������� ���������� ��� �������� �������, ��� ������� ����� ���������� ��������� �������, � ������������� �� � ������ �� ������� (���������) ���������� (���������). ������ ������� ������ �����������������, ����� ������, ������� ���������� (���������), ������������ � ������, � �������� ��������� TSOB (��� ���������� ��������� DTIME, ��������������, ��� �������, �� �������� ������� TNOW).
������������ � ���������� �������, ����������� ���������� �����������, ������� �������� ��������������� �������. ��� �������� � ������� ������������������� �����-��������� ��� ������. ��������� ��������� ������������ �� ������ ��� �������� �������, �� � ��� ������� ��������� ������������� ��������, ������� � ��� ����������� � ������� ����������� ������� ���������. �� ���� �������� ������� ���������� �� ��������� � ����������� �� �������. ������������ ����� TNOW ����������� ������ ����� ���������� ���������� ������� �� ���������, ����� ���������� ��������� ����� ��� ��������� TSOB. �������� ������� ���������� ������� � ���� ������, ��� ���� ������� �����, ������������� ������ ��������� TNOW=TSOB. � ���� �������� ��������� �������������� � ������� ��������� ������ ������������� GRUP, ���������� ����� ������ ��������� � ���������, ����������������� ���������� ������� ������������ ��� �������.
����� �� ���������� ������ ������� ������������ �������� ������� ���������� ������� (������ �������� ������ ������ �������� ��������, ����������� �������� ����� �������� ��� ����� ������, ������������ ���������� ����������): �) ��������� �� ����� TTFIN, ���������� �� ������; �) ���� �� ��� ������� � ���������; �) ������ �������.
���� ��������� (NNRS) ������ �������������, ���������� ������������ ���������� ������ OTPUTN �� ������� ������� � ������������ ����������� ��������: ���������� ���������� ����� �������� ��� ��������� ��������.
����� ���������� ���� NNRNS �������� ���������� ��������� ��������� ����������� ���� �������� � ���������� ��������� ������ OTPUT.
���� ������ ������� � ����� ����� ��������� ������������� � ��� ����� TNOW � ������������ � ������������� ����������.
���������� � ���������, ������������ � ������, ����� ��������� �� ������ ������: ��������� (��������, TNOW), �� ��������� �� ������� ������������� � ����������� � ��������� �������; ���������������� (���������), ������������ ����� ������� � �������� ������������� ��� ������ ������ ������; ������������, ����������� �� ���� ������������ ������; ���������, ��������������� ��������� �������. ������������ ��������� �������� � ������� ������, ��������� – � ������� ������ (������ ��������� �������� ��������, ������������ � ������ �������) � � ������������������ ��������� INTLC – ��� ������� �������.
�������� ���������-���������� ��������
����� ������� ������ ������������ ������������� ���������� � ������� ������ � � ��������� INTLC.
��������� �������� �������� ������������ �� ��������� ���������� �� ��������� �������, ���������� ����� ������ ���������� � ��������� ������������� ���� �� ���� �������. ��� �������� ��������� ���������� � ������ INTLC ����� ������ ��������� ������������ SCHDL.
������ SCHDL �������� � ��������� ��� �������� � ������� �������: ��� ��������, ��� ������ KEVNT � ����� ��������� TSOB (�������� ��� ����� – ��������� ����� � ���������� DTIME, �������������� � ����������� �� �������. ��������� ��������� ����� ������ �������� ������� �������� TNOW, ����������� ����� �� ���� ����� TSOB, � ������ ��� ���������� DTIME. �������� �������� ������� "������� ���������", � ���������� ����� ����������� � �������� ��� ������������� ������������ TSOB).
���������� �������� ������ ������������� ������� (�������) ���������� � ������ �� ��������� ������� ������� � ����������� �������� ��������� TSOB. ���������� �� ����������� ������� ������������ ��� ���������� ���� ��������. ���, ��������, TSOB ���� ����������� �������� ��������� ����� (TNOW=TSOB). ��� ������ KEVNT ��������� ��� ������ ���������������� ��������� ���������� �������. �������� ������� ������������ ��� ����������� ����������� �������� ��� ��������.
����� ��������� ���������� ������� ������������ ������������������ ��������� EVENT, � ������� ��� �� ������ ���������� ��� �������. �� ���� ������� ��������� EVENT ���� �������� ���� ������������ ����������, ���� ���� � ���� ������ ���������� ���� ��������� ��������� �������.
����� ���������� ������� ����������� ������� ��������� �������. ���� ������ ����� ����������, ���� ��������� � ��������� ��� ���������� ���������� ���������� �� ������� �������. ���� ������ ������ ���� ��������, �� ����������� � �������� ������� ���������� �������������� � ����������� ����� �� �������. ����� ����������� ������� ��������� ���� ��������. ���� ������� ������������, ���������� ���������� ��������� INTLC ��� ���������� ���������� �������. ��� ���������� ���� �������� ������������ �������� ����� �� ���� ��������.
�������� ��������, ��� ��� �������� ���� �� ���������-���������� �������� ����� ����������� ��� ����� ������������ ��������. ������� ���������� ����� �������� ���������� �� ������ �������� ��������� ��������� ���������� ���� – ���������� �������� ����, ����������� �� �������� ������ ����� ������ �������� (���. 4.1).
��������� �� http://www.allbest.ru/
���. 4.1. ����-����� ��������� ���������� ���������� �������
��� ���������� ������, ������ � ������ ����� �������� ����� ���� ������������ � ��������� �������, � ����� ��������������� � ������ ���������� ��������. ������ ������ ������� �������� ���������, ������ – ���������������� (���������).
������ ���������� ������
� �������� ������� ���������� ������ ���������� ����� �������������� �������, ���� ��������� ������, ������� ����� �������������� � ������������� ������. ��������� ����������� ������������ �������� ��������������� � �������������� ��������� =20.0 ������. ����� ��������� ������������ ����� �������� ���������� �� 10 �� 25 ������. ����������� ������ ���� � ������� 480 ������ �������.
����� �������������� ������. ��� ��� ��� ���� �������� ����������� ���������, ��� ����� ������������ ��� ��������, ��������� ������������� ������������ ������� ���������� �������.
����������� �������. �� ���� ��������� ����� ������� (����������� ������, ���������� �� � �������, ��������� ������, ���������) ����������� ����� �������� – ����������� (������) � ��������� (������������), ��� ��� ������ ��� ���������������� ���������� �������. ������ ������������ � ���������� � ������� (���� ��� �� ��������� ��������� ���������� ������) ��������� � �������� ����������� ������, � ��������� – � ���������� ���������. ������� ������ �������� �� ���������� � ������� � ��������� ������ �� �����������������.
�������� �������. �������� ������ ����� �� ������������� ����������� ������, ����� ������� ���������. ����� �������, �������� ������� "������" ����� ���� ��������� �� ������������. ������ � ����� ����������� ������ � ���������� �������� �� ��������� � ������ MATR=1. � �������� ������������� �������� ������ ����� ����������� ������ (���� ���� �������� ��� ����� ���� ��������� ������ � ����������� TSOB). ��� �������� ������������, �� ��� �������, ����� �� �������������� ������� ������ �������������, ����� �����, � ���������, ��� �� �������, ��� � ������� �������������� �� ������� "������", ��������� ������������� ������������ ������ � ��������� �� ������� �����������. ������ ������������� ������������ �������� �� �����������, ���� �� ���������, ��������, ���������������� �������� ���� �������� (��� �������� �� ���������� ������� "������" � "������������" � ����� � ��� �� ���������).
��������� ������������. ������������ ������������ SCHDL �������� ��������� � ������ ����� ��� ���������� ��������� – ��� ������������ ������� KEVNT, ����� ��������� (����������) TSOB � ������ A1, ������� ��������� ��� �������� ������������ ������� ��� ������ SCHDL. ���������� SCHDL ��������� ������� (���� �������):
SUBROUTINE SCHDL(KEVNT, TSOB, A1)
DIMENSION A1(MATR), A2(MATR+2), A3(MATR+2, NNQ1)
2IF(A3(MATR+1, J).EQ.0) GOTO 3
����� A2 – ������ ��������������� ���������� ������ ��� �� ���������� ��������� � ��������� ������� (����������� ���� �������� ������ ���� ������); A3 – ������ ��� ����������� ����� ��������� � ����������� ������ �� �������� �������� (�����); NNQ1 – ������������ ����� ������� ���������. ��������� ����������� ������� ��������, ����� ��������� �������, ����� ��� ������ � ����� ��������� TSOB, ����������� ������� A2 ���� ������ �� ��������� ��� ������� A1. ��������� SCHDL �������� ���������� �� ��������� �� ������ � �� ������� COMMON (���������� ����� COMMON �������� ������ ��������������, ������������ � ������ ��������� ��� ����� � ������� �����������).
� ��������� DO 1 (����) ���������� ������������ ������ ��������� (���� ������� A2), � ������� ��������� ������ �� A1. ����� ����� � A2 ���������� ��� � ����� ��������� �������. �������� READ ������������ � ������ A3 ���� ��������� (����� ���� � ������ ��������, ������ – � ������ ������) � �������� �������� ��� ������ � ����������. �������� DO 2 �������� ����� ������ ��������� ������ � ��������� �� ���� ������� (������ ��������, ���� ��� �����������, ��� ������� ���������������� ��������� ����� � ������ ��������), ����� ���� �������� WRITE ������� � ���� ��������� (����� ���� � ������ ��������, ����� – ������� � ������ � ������� J) ������ �� ������� A2.
�������� ������ ��������� ������������:
CALL SCHDL (KEVNTZ, TSOBZ, ATRIB)
����� KEVNTZ – ��������� ��� �����, ������������ KEVNT, TSOBZ – ��������� ��� ������� TSOB, ATRIB – ��������� ������������������ ������: ��� ������������ ������� �� �������� ���������� (� ������ ������ �������� ������������ �������) � ���������, ��� ���������� ������ �� ��������� ��������� ����������� ������. ��������, ��� �������� ������� ATRIB ��� ������������ ������ ���� �������� ��� ��� �� ������ ������ �� ���������� ��������.
���������� ������� � ���������. ��������� ����������� ������� ������� � ��������� ����� ����� ��������� ���:
DIMENSION A2(MATR+2), A3(MATR+2, NNQ1)
COMMON /COM1/ MATR, �
IF(A3(MATR+1, 1).EQ.0) GOTO 1
IF(A3(MATR+1, J).EQ.0) GOTO 3
IF(A3(MATR+1, L).EQ.0) GOTO 8
IF(A3(MATR+2, L).GE.Z) GOTO 4
��� ����� �� ������������ ���������, ����� ����������� � A3 ��������� �������������� �������� ��������� ������ ������. ���� ��� ������, ����, ��� �� ��������� ����� ������� ������� � ����������� �������� ��������� �, �������������, ���������� �������� ��������� �� ���� ������ �����. ��� ������ ���� � ������ 1, ���������� ��������� ���������� � ������ 6 ������ A3(I, J+1), ������������ ����� ��� ������������ ���������� �������. ����� �������� ���������� �� ����� 3, ��� ������������ ����� ��������������� ��������� �� ������� A3 � ���� 1.
���� ������ ������ ��������� �� �����, ������, ��������� ������� ����� ������������ ������-�� ������� � ���������� ���������� ������ �� ����������� �� ������� ��������� (��������������� ������� ����� ����� ����� ����� ���������). ��� ����� � ��������� DO 2 J=1, NNQ1 -1 ���������� ��������� ������� ��������� J-� ������ � ����������� ���������� ��������� ������� � ����������� ���� ������ �� ������ ����� ��������� (������� A3). ����� ������ ����� ������������������� �������� ���������� IF(A3(MATR+1, J).EQ.0) GOTO 3 J-� ������ ����������� �� ���� �������. ���� �� ����� ����, ��������� �������� � ���������� ���������� ����� 3 ��� ������ �������� ��������� � ����.
����� ����������� ��������� �������� K=J ���������� ����� J-� ������, � �������� Z=A3(MATR+2, J) – �� ����� ���������. ��������� �� ���� ���� DO 4: �) ��������� ��� ���������, �������������� � J, ������ L; �) ���������� ����� ���� �������; �) ���������� (��������� K, Z) ����� � ����� ��������� ������ L. ���� ����������� ��� ������ L ����� ����, ��������� �������� � ���������� ���������� �� ����� 8 ��� ������ ������� ����� �������� J � L (K), ��� ��� � ����� DO 4 ���������� ��� �������� �������� � ��������� ������ � ��������, �������, ��� � ������ J. ���� ����� ��������� ������ L ����������� ������ ��� ������ ���� �� ��� ������ J, ���������� ���������� ����� 4 � ��������� � ��������� ������ ��������� (���� DO 4).
����� ��������� ����� ��������� ������ DO 2 J=1, NNQ1 ��������� �������� WRITE(1’1) A3 ������� ������ � ���� 1.
���������� ������ ������. ������ ��������� ���������� ������ ������ �� ���������:
DIMENSION A3(MATR+2, NNQ1), ATRIB(MATR)
COMMON /COM1/ MATR,�
����� ����������� ��������� � ������ A3 �� ��� ������ ������ ����������� � ������������ (����������� �� ����������) ��� �������� ����� COMMON-�������: ����� ��������� (� ���� TSOB), ��� ������� I � �������� ������� (���� DO 1). ����� ��� ������� ������ ������ ���������� (������ ���������� ������� ������). ���������� ��������� ��������� � ���� 1, � ��� �������������� ������� ������� ���������� ��������� GRUP.
���������� ����� ��������. ������� ������ ������� �������� ����������� �������� ���� �� ������������ ���������� ������:
COMMON /COM1/ MATR,�
IF((TNOW.LT.TTFIN).AND.(A2(MATR+1).GT.0)) GOTO 1
IF(NRNS.LT.NNRNS) GOTO 2
���������� ���������� ������� ���������� ����� ����� ���������� ������ �� ��������� (��� ����, ��� �������� ����, ���� ����������� ������ ����������� �� ����������). ����� ������� TSOB ���������� � SLAM ����� COMMON-�������, ��� � ������ ����������. ���������� ������� ���������� ����� ������ ��������������� ��������� ���������� EVENT(J) �� ���� I ������������ ������� (J – ���������� ��������, ���������� �������� J=I ��� ������ ��������� EVENT). �������� READ(1’1) A2 �������� ������ ������ ����� ��������� ��� ����������� ������ �� ���� ����������, ����������� � ������� ������� ��������� ������� – ���� ������. �������� ����� ������� ����� �������� IF((TNOW.LT.TTFIN).AND.(A2(MATR+1).GT.0)) GOTO 1. ����� �� ������� � �������� ����� ����������� �������������� ����������� OTPUTN � OTPUT. ��� ���������� ������� �� �������� � ��������� OTPUTN ������ ���� ��������� ����� ������� NRNS. ����� OTPUT �������������� �� ���������� ��������� NRNS � NNRNS � ��������� IF(NRNS.LT.NNRNS) GOTO 2.
��������� �������������. ��������� ����� ������ � �������� ������������ ���������� (�����������������) ���������. ������������� �������� �������� ������� ���������� ������������� ������� � �������� ������������ �������. ���� ��� ������� ������:
DIMENSION A3(MATR+2, NNQ1), ATRIB(MATR)
COMMON /COM1/ MATR,�
TSOBZ=TNOW+EXPONS(20.0) (EXPONS(20.0) – ��������� ��������)
����� ���������������: ����� TNOW ������ ���������� �������, ����� ������� NRNS, ������� ����� LO ������� ��� ������� "������", ������������ �������� MLO ����� ������� (MLO ������������� ��� LOMLO � �� ��������, ���� LOMLO ��� LO=MLO), ����� NL ���������� ������� "������" � ������� (��������� ����������� ����� ���������� ������, ������������ �� ��� ���� ����� � ������� � ������� �������), ����� NI ������� ������� �� ������� (����� �������������� ��� �������� ��������� � �����), ���������� ����� ������� A3 (��������������� ��� ����� �������), ��������� ��������� ������������: BUSY=0 (��������). ��������� ������� ���������� ������������ ������������ ������� �������, ��� � �������� KEVNTZ ���������� ��� ������, � TSOBZ �������������� �� �������, ���������� �������� DTIMEZ (����������� �������� ��������� DTIME) � ���� ����������, ���������� �������� =20.0. ������ ATRIB � ��������� ������������ � ����� ������ ������ ��������� MATR ���������. � ����� ������� MATR=1, � ������������ ������� ATRIB(1) ����� ��� ����� ���������� ������������ ������� � ��������� ATRIB(1) =TSOBZ.
������� ������. ������� �� ����� ����������������. ������ �� ��������:
COMMON /COM1/ MATR,�
DEFINE FILE 1(K1�NZ), 2(K2�NK)
����� 1, 2 � ���������� ���������� ������ – �� ������; K1, K2 – ���������� ����������� �������; NZ, NK – ��������� ������� �������. ���������� I1, I2 – ��������� ���������� ��������� ����� (������� �� ���). CALL SLAM – �������� ������ ���������� ����������.
��������� �������. ��������� ��������� (����������) ������� ��������� ������������� � ������������ ������������� �������. ����������, ��������, ������� ������ ���������� ������� ������ 1 – �������: