%ɽ��   �餯�餯��ǽ�饤�֥��
%
%����
%\Drireki{
%         95/04/13 ;�� ����
%        }
%
%\Dchapter{��ɸ��}
\Dchapterhead

�����Ǥ� GRPH2 �Υѥå������Τ�����ɸ������˴�Ϣ���� 
U[XYZ]PACK/ULPACK/UCPACK �δ���Ū�ʵ�ǽ��Ҳ𤷤ޤ��礦. �����Υѥ�
��������Ȥ��ȿ��ԤΥ��֥롼���󥳡����¿��¿�ͤʺ�ɸ�����������Ȥ���
���ޤ�. �����Ͻ��θ���, ����˶Ťä���ɸ�����������Ȥ�Ǥ��ޤ���, ��
���ˤĤ��Ƥϼ��Ϥ��������ޤ��礦.
\vspace{1em}

�ʤ�, �ʲ��Υץ��������Ǥ�, GRPACK ���Ѥ��ƽ��������ڡ����ʤɤ���
��򤪤��ʤäƤ��ޤ�����, ������롼����{\tt UZINIT}���ۤ˸ƤФʤ��Ƥ�
�褤�褦�ˤʤäƤ��ޤ�.

%-----------------------------------------------------------------------
\section{������ɸ��}

�ޤ�, �Ǥ��ñ�ʥץ�������� {\tt UXYZ1} �򸫤Ƥߤޤ��礦.  
UXPACK/UYPACK �Υ��֥롼�����Ȥä�, $x$��, $y$���Ȥ��������ɸ��(����
��������)������, ���줾��μ��ˤ�������ȥ�٥�(������ΤȤ����ˤĤ���
����), ����ӥ����ȥ�(��������)��Ĥ��ޤ�. �ޤ�, �ޤΥ����ȥ��Ĥ���
���Ȥˤ��ޤ�. 

\Dproginput{uxyz1/uxyz1.f}
\vspace*{2em}

\begin{center}
\Depsf[10cm]{uxyz1/uxyz1.eps}\\
{\bf uxyz1.f: frame1}\\
\end{center}

�ޤ�, ��ɸ����Ϣ�Υѥå���������Ѥ���Ȥ��ˤ�, ������ɥ��ȥӥ塼�ݡ�
��(��\ref{s:kihon2_wv}��)��Ŭ�ڤ����ꤵ��Ƥ��ʤ���Фʤ�ޤ���. ����
��, ��ɸ���κ���Ԥʤ��ˤ����äƺǤ����Ū�ʤ��Ȥ�, 1�ܤκ�ɸ��(1��
�μ��Ȥ�����դ��������ꤪ��ӥ�٥�ˤ�äƹ��������)����������˺�
��롼�����1��Ƥ֤Ȥ������ȤǤ�. ������Ǥ�, �岼�������碌��4����
�롼����($x$���� {\tt UXAXDV}, $y$���� {\tt UYAXDV})��Ƥ�Ǥ��ޤ�. 
�ǽ�ΰ��� {\tt 'B'}, {\tt 'T'}, {\tt 'L'}, {\tt 'R'}�ˤ�ä�, ���줾
��, ��, ��, ��, ��¦�μ������褹�뤳�Ȥ���ꤷ�ޤ�.  ��ɸ������������
��ξ���,������ɥ��ȥӥ塼�ݡ��Ȥ����ꤷ������ΰ�Τ��礦�ɶ�����
��ˤʤ�ޤ�. ����2�Ĥΰ����Ǥ�, û���������Ĺ���������ɤ�ʴֳ֤�
�ǤĤ���U-��ɸ�Ϥ��ͤǻ��ꤷ�ޤ�. ��٥��, Ĺ��������ΤȤ����ˤ�����
����ޤ�.
\vspace{1em}

���ˤĤ��륿���ȥ뤪��ӿޤΥ����ȥ��, ���줾��μ��ˤĤ��ƥ����ȥ���
��롼�����ƤӤޤ�. �������ʸ���ǥ����ȥ�����������Ȥ��� {\tt
UXSTTL}, {\tt UYSTTL} �롼�����,�礭���ʸ�������������Ȥ��ˤ� {\tt
UXMTTL}, {\tt UYMTTL} �롼������Ѥ��ޤ�. �ǽ�ΰ����ˤ�äƥ����ȥ��
�Ĥ��뼴�ξ�����ꤷ�ޤ�. 2���ܤΰ����ϥ����ȥ�Ȥ�������ʸ����Ǥ�. 
�Ǹ�ΰ����Ǥ�, �����ȥ���������֤�$-1.0$����1.0�ޤǤμ¿��ͤǻ��ꤷ
�ޤ�. ���Ȥ���$x$���ˤĤ��Ƥ�, $-1.0$: ����, 0.0: �����碌, 1.0: 
���󤻤Ȥʤ�, �ޤ�$y$���ˤĤ��Ƥ�, $-1.0$: ����, 0.0: �����碌,
1.0: ��󤻤Ȥʤ�ޤ�. ������β�¦$x$���亸¦$y$���Τ褦��, Ʊ������
�Ф���2��ʾ奿���ȥ�����롼�����Ƥ���Ȥ��ˤ�, �����ȥ뤬�Ťʤ��
���褦�ˤ������ȳ�¦�����ؤ��餷��������ޤ�.
\vspace{1em}

������ޤޤ˺�褷�Ƥߤ�, �֤Ϥ�, �����ȥ���٥���礭��, ������Ĺ
���ʤɤϰ��ΤɤΤ褦�˷�ޤäƤ���Τ�����?�פ�,�Ի׵Ĥ˻פ����⤷���
����. ���ĤϤ�����°����, UZPACK �δ������������ѿ��򻲾Ȥ��Ʒ���
��Ƥ���ΤǤ�.  �դĤ������Ӥˤ�, �����ǽ�ʬ����­�Ǥ����ɸ������
��Ǥ���Ǥ��礦. �����ȥ���礭���䤽�����������ʤɤ���ꤷ���ȼ��κ�
ɸ�����뤳�Ȥ�Ǥ��ޤ���, ����ϼ��Ϥˤޤ路�ޤ��礦.


%-----------------------------------------------------------------------
\section{�п���ɸ��}

���Υץ������ {\tt UXYZ2} ���п���ɸ������Ǥ�. 
�п���ɸ��������� ULPACK ��ô�����Ƥ��ޤ�.

\Dproginput{uxyz1/uxyz2.f}

\begin{center}
\Depsf[10cm]{uxyz1/uxyz2.eps}\\
{\bf uxyz2.f: frame1}\\
\end{center}

�п���ɸ���������ˤ�, �ޤ� {\tt GRSTRN} �롼����ˤ�ä��п��Ѵ��򤢤�
�魯�Ѵ��ؿ��ֹ�����ꤷ�ޤ�.  �Ѵ��ؿ��ֹ�ˤĤ��ƤϤ��Ǥ���
\ref{s:kihon2_trn}����������ޤ�����, 1: ľ�Ѱ��ͺ�ɸ(������ɸ), 2: 
���п�($y$��)��ɸ, 3: ���п�($x$��)��ɸ, 4: ξ�п���ɸ�Ǥ�.
\vspace{1em}

�п���ɸ�����������֥롼����� {\tt ULXLOG}, {\tt ULYLOG}�Ǥ�. ������
��, �ǽ�ΰ����Ǻ�ɸ��������������ꤷ�ޤ�.  2�֤�ΰ�����, 1�����
�Ϥ�������٥�ο��Ǥ���, $x$���ˤĤ��Ƥ�1�ȤʤäƤ���, $10^n$�ΤȤ���
�ˤΤߥ�٥뤬������ޤ�. �ޤ�, $y$���ˤĤ��Ƥ�3�ȤʤäƤ���, $10^n$��
���ˤ�$2 \times 10^n$, $5 \times 10^n$�˥�٥뤬������Ƥޤ�. ���ΰ���
��2�ʤ��, $10^n$��$2 \times 10^n$�˥�٥뤬������ޤ�. �Ǹ�ΰ�����,
1����ϰϤ�����������ο��Ǥ�. �����Ǥ�1����9�ޤǤ��٤Ƥ��������ǤĤ�
����, 9����ꤷ�Ƥ��ޤ�. 8�ʲ��ξ��ˤ�, �����ֳ֤ζ����Ȥ�������ʤ�
��ޤ�.


%-----------------------------------------------------------------------
\section{����Ϥ��줷�����ռ�}

Ĺǯ�ˤ錄��ǡ�������Ϥ����ͤʤ�, ���ռ���Ĥ��뤳�Ȥ����ݤ������Ͻ�
ʬ�����ΤǤ��礦. UCPACK ���Ѥ����, ��ǯ�ޤǹ�θ�������������ռ�����
�פ˺�褹�뤳�Ȥ��Ǥ��ޤ�({\tt UXYZ3}).

\Dproginput{uxyz1/uxyz3.f}

\begin{center}
\Depsf[10cm]{uxyz1/uxyz3.eps}\\
{\bf uxyz3.f: frame1}\\
\end{center}

�ޤ�, ��褷�褦�Ȥ����ɸ���ˤĤ��Ƥ�, ������ñ�̤Ȥ����������Ѵ�����
�ꤹ��ɬ�פ�����ޤ�. �ޤ�, ��ɸ���κ���, U-��ɸ�Ϥˤ�����0��������
����֤��餪���ʤ��ޤ�����, ������ξ��Τ褦��1996ǯ1��1������3��
31���ޤ�91��ʬ��ӥ塼�ݡ��Ȥ��äѤ��˳�����Ƥ����Ȥ��ˤ�, ������ɥ�
��ξü�ͤ� {\tt UXMIN} �� 0.0, {\tt UXMAX} �� {\tt RND}(= 90)�Ȼ��ꤷ
�ޤ�(12�Ԥ�).
\vspace{1em}

���դ˴ؤ����ɸ����, ���֥롼���� {\tt UCXACL}, {\tt UCYACL} �Ǵ�ñ��
�����ޤ�. �ǽ�ΰ����Ǥ�, ����ޤ��̤�, ��ɸ��������������ꤷ�ޤ�. 
2�֤�ΰ��� {\tt ID0} �ϵ���, �Ĥޤ��ɸ���������Ϥ����ǽ�����Ǥ�. 
3�Ԥ�Υѥ�᡼��ʸ��ߤ�����餫�ʤ褦��, 8�������($yyyymmdd$)�ǻ���
���ޤ�. $yyyy$��ǯ, $mm$����, $dd$������, ���ξ�� {\tt ID0=19960101} 
�Ǥ�����, ������1996ǯ1��1���Ȥʤ�ޤ�. �Ǹ�ΰ����Ǥ�, ������ʬ������
������ꤷ�ޤ�.


%-----------------------------------------------------------------------
\section{����Ⱦü�ʥ�����ɥ�}

������ɥ��κǾ��͡������ͤ�ɬ�������ڤ�Τ褤�ͤǤʤ��Ƥ�����פǤ�.
{\tt UXYZ4} �Υץ��������Ǥ�, $x$���ˤĤ��Ƥ�$-50$����50���ϰϤ�,
$y$���ˤĤ��Ƥ�1000����0.4���ϰϤǥ�����ɥ������ꤷ�Ƥ��ޤ�.  ���Τ�
��, {\tt UXAXDV} �Ϥ������ͤ������ܤȤʤ�Ȥ����������ȥ�٥��������
��. �ޤ�, {\tt ULYLOG} ��$10^n$����$10^{n+1}$��1��������Ȥ��������ȥ�
�٥�������ޤ�. ���Τ褦��, �������٥���ڤ�Τ褤���������ñ�̤Ȥ�
�ƺ�褬�����ʤ��ޤ�. �����, ���ߤδֳ֤������򤦤�, ���ߤΤȤ�����
��٥��������������, ���Ϥ򸫤Ʋ�����.
\vspace{1em}

�ʤ�, ������Ǥ�, {\tt ULYLOG} ���Ѥ����п���ɸ�������褹��ݤ�, {\tt
ULISET} �롼����������������ѿ� {\tt 'IYTYPE'} ��3���ѹ����ƥ�٥��
�񼰤��Ѥ��ޤ���. �п������դ����٥�ν񼰤�������4�����Ѱդ���Ƥ�
�ޤ�.

\Dproginput{uxyz1/uxyz4.f}

\begin{center}
\Depsf[10cm]{uxyz1/uxyz4.eps}\\
{\bf uxyz4.f: frame1}\\
\end{center}
