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

[Takeshi Horinouchi <horinout@xxxxxx>]

��Ƿ��Ǥ���

��­�Ǥ����������ȥ����Ȥ��줿���ꥸ�ʥ륽�����Ϥ����餺���ץ�
�ȥ������������ * ��Ĥ֤��ޤ��礦������ʴ�����

/* 
 *      SUBROUTINE SGPLU(N,UPX,UPY)
 *      REAL      UPX(*),UPY(*),VPX(*),VPY(*),RPX(*),RPY(*)
 */
      SUBROUTINE SGPLU(
          INTEGER N
          REAL (N) UPX
          REAL (N) UPY
      )

�ʤ����оݤ򸫤Ĥ���ˤϰʲ��������Ǥ���

% grep -nv '^ *\*' grph1.f77proto | grep '\* *)' | grep -v CHARACTER

��Ƿ�� ��                     horinout@xxxxxx
�������������Ȳʳظ��楻�󥿡� (��Ķ�������ȸ��楻�󥿡�)