[dennou-ruby:000553] Re: array dimension proto type

[Kuroi Keiko <keiko@xxxxxx>]

��Ƿ�⤵��

�������Ϥɤ��⤢�꤬�Ȥ��������ޤ�����

In message "[dennou-ruby:000542] Re: array dimension proto type"
    on 00/11/11, Takeshi Horinouchi <horinout@xxxxxx> writes:

> >           CHARACTER*(*) CP
> > 
> > �ߤ����ʤΤϤɤ��֤�������Ȥ��������ˤʤä���Ǥ��礦��. 
> 
> ���������ޤ��礦�����̤���Ĺ���ϰ����ˤ���ޤ��󤫤顣

proto2c �ǡ�CHARACTER*(*) (*) CPARA �Τ褦���ѿ��򰷤���褦
�������Ƥ��ޤ���

����ˤʤäƤ��ʤ���CHARACTER*(*) �ξ��ϡ������Τ����̤ꡢ
Ŭ���ʥ��������ꤷ�Ƥ�����פ��Ȼפ��ޤ���

ʸ���������ξ��ϡ�ʸ�����Ĺ���ȡ�������礭����ξ����ʬ
����ʤ��ȡ����ޤ������ʤ��褦�ʵ������ޤ���( ���ϡ����ϤȤ�
�Ǥ���)
��åѡ����ʸ������������äĤ��Ƥ��� CDCL ���Ϥ��Τǡ�ʸ��
���Ĺ���Ȥ��Ƥϸġ��Υ��֥������Ȥ�Ĺ���ǤϤʤ���������줿
Ĺ����ɬ�פˤʤ�ޤ���


�����ѿ��Υꥹ�ȤǤ���

-- grph1 --
"CHARACTER*1, len o CKX in szfont"
"CHARACTER*1, len o CKY in szfont"
"CHARACTER*1, * o CLX in szqfnt"
"CHARACTER*1, * o CLY in szqfnt"
-- grph2 --
"CHARACTER*(*), * i CH in uxplba"
"CHARACTER*(*), * i CH in uxplbb"
"CHARACTER*(*), * i CH in uxplbl"
"CHARACTER*(*), * i CH in uxaxlb"
"CHARACTER*(*), * i CH in uyplba"
"CHARACTER*(*), * i CH in uyplbb"
"CHARACTER*(*), * i CH in uyplbl"
"CHARACTER*(*), * i CH in uyaxlb"
"CHARACTER*(*), * i CH in usaxlb"
"CHARACTER*(*), * i CH in usplbl"
-- math1 --
"CHARACTER*1, * i CX in indxcf"
"CHARACTER*1, * i CX in indxcl"
"CHARACTER*1, * i CX in nindxc"
"CHARACTER*80, * i CPLIST in cfsrch"
"CHARACTER*80, * i CFLIST in cfsrch"
"CHARACTER*8, * i CPS in rtiget"
"CHARACTER*8, * i CPS in rtlget"
"CHARACTER*8, * i CPS in rtrget"
"CHARACTER*8, * i CPS in rtcget"
"CHARACTER*80, * o CPARA in rtcget"
"CHARACTER*40, * i CPL in rliget"
"CHARACTER*40, * i CPL in rllget"
"CHARACTER*40, * i CPL in rlrget"
"CHARACTER*40, * i CPL in rlcget"
"CHARACTER*80, * o CPARA in rlcget"


���Τ�����åѡ���ɬ�פʴؿ��ˤĤ��ơ�* ��( ʸ�����Ĺ����
�ޤ��) ����̾���������֤�������褦��proto �ե��������
����ĺ����ȴ򤷤��ΤǤ�����
( �⤷���֤��ʤ���̵���Ǥ����顢��Ǽ�ʬ�Ǥ�äƤߤޤ��Τ�
  �������äƤ���������)
�Ǥϡ�����������ꤤ���ޤ���


���� ����