[dennou-ruby:000078] Re: gtrb & multi-D array

[Takeshi Horinouchi <horinout@xxxxxx>]

��Ƿ��Ǥ���

>> ¿ʬ��ꤽ���ʤ��Ȥ�®��Ū������ˤʤ�Τϡ�Ruby �ǽ񤤤�
>> �����Υ᥽�åɤ���������ǡ��������ƤϤ᤿�����ʤɤ�
>> �����Ȥ��Ǥ��礦����

>> ��������
>>    def t2theta2(p)
>>        if (p>=0) 
>>          self * (P0/p)**K
>>        else
>>          self * (-p/P0)**K
>>        end
>>    end
>> �Ȥ����Ƚ�Ǥ����äƤ���Ⱦ����줷���ʤ�


�� �Ϥ����Ƥ��餴���ʤ�����

IDL�����Ǥ��������Ƚ�ǤˤϤ���ʤ�����⤢��ޤ���

idx=p.where{|i| i>0}    ## 0����礭���Ȥ����Υ���ǥå����򽸤᤿����
self[idx]=self[idx]*(P0/p[idx])**K

elsewhere��ʬ��ɤ����ä���񤯤�������Ǥ����������Ǥ򥪥֥������Ȳ�
����ɬ�פ�̵���ʤ�ޤ� (where�μ����� C �Υ�٥�Ǥ��С� �äƤɤ���
��������)��

�� ������ñ�ˤ�뤿�� IDL �Ǥ�¿��������ΰ켡�����󰷤�������ޤ���
   (where�ν��Ϥϥǡ�����Ƭ������̤��ֹ������Ǥ褤)

> �� �ޡ�������� ruby �� super computing �äƤ��Ȥ⤢�뤫��
> �� �Τ�ʤ����Ȥ������ȤǤ����ۤ򡣡���

��������Ȥ��ƻ��ruby�򥷥ߥ�졼�����˻Ȥ������ȻפäƤ��ޤ���
CPU���ܰ��ջȤ������Ť��׻��Ǥʤ�������äȴ�ñ�ʥ�ǥ��Ȥ�������
�����ä����Ȥ��ɤ�����ޤ���͡����������Ȥ��˳�ȯ�����Ȥ�����ʤ��㸺
���Ϥ����Ȼפ��ޤ�������ˡ�ruby��GCM�Ȥ����Τ⤤���Ǥ��͡�C��
Fortran�ǽ񤫤줿�Ƽ����ʤ򤽤����Ƥ����� rbuy �����礹�롣

��Ƿ�� ��                 horinout@xxxxxx
�������Ķ�������ȸ��楻�󥿡�    611-0011 �����Ըޥ���
phone:0774-38-3812                     fax:0774-31-8463