1999/08/06    libg2c.a in egcs-1.1.2-12c and Physics Analysis Package

[1] libg2c.a in egcs-1.1.2-12c

egcs �Ǥ� libf2c �Υ饤�֥�꡼�Ǥ���äȺ��ä����������������C++ �ץ������� FORTRAN �ץ�����ब���ߤ��붦ͭ�饤�֥�꡼�������Ȥ��� -lg2c ��Ĥ���ȡ����褿��ͭ�饤�֥�꡼�ϥ����ʥߥå������ǥ��󥰽���ʤ����ɤ���顢libg2c.a �� PIC �ե�å���Ω�Ƥ��� ����Ƥ���褦�Ǥ��롣
  1. ��������ϡ���ͭ�饤�֥�꡼����ݤˤ� -lg2c ��Ĥ����ˡ� ���ץꥱ�������ν�� -lg2c ��Ĥ��뤳�Ȥˤ������ǽ�Ǥ��롣 ������������ˡ�Ǥϡ���ͭ�饤�֥�꡼���Ȥ������ꤵ��� FORTRAN �Ȥ߹��ߴؿ��� ���Ƥ򡢥��ץꥱ�������ץ�������������Ū�˻Ȥ����Ȥˤ�ꡢ ��Ū�˥�󥯤��Ƥ���ɬ�פ����롣 ����Ǥϡ����ˤ�äƤϡ���ͭ�饤�֥�꡼�����٤˥��ץꥱ�������� ���ʤ����ʤ���Фʤ�ʤ���ǽ�������������ޤꤦ�줷���ʤ���
  2. �⤦��Ĥβ��ˡ�ϡ��������-fPIC ��Ĥ��� libg2c.a ����ʤ������ȤǤ��롣����������򤷤Ƥ��ʤ��Τˤϲ�����ͳ������ΤǤ������������ʤߤ˥���ƥ�Ϥ� Linux (RedHat-6.0) �Ǥ����꤬�ʤ��Τǡ��Τ��᤿�櫓�ǤϤʤ�����-fPIC �Ĥ��ǥ���ѥ��뤵��Ƥ���褦�ʵ������롣
�Ȥ����櫓�ǡ���ɡ�������Ǥ�Ȥ������Ȥǡ���ʬ�Ѥ� libg2c.a �� -fPIC �դ��Ǻ��ʤ������Ȥˤ�����-fPIC ��Ĥ���ѥå��������ˤ��롣�ޤ���RPM �����Ѥ� SPEC ���������Ǥ��� RPM ��
egcs-1.1.2-12cm.ppc.rpm
egcs-c++-1.1.2-12cm.ppc.rpm
egcs-g77-1.1.2-12c.ppc.rpm
egcs-g77-1.1.2-12cm.ppc.rpm
egcs-objc-1.1.2-12cm.ppc.rpm
SRPM ��
egcs-1.1.2-12cm.src.rpm
�Ǥ��롣

�������FORTRAN �ؿ���ޤඦͭ�饤�֥�꡼����ʤɤȤ������Ȥ򤷤ʤ���С��������פ��ѹ��Ǥ��롣"rpm -Uvh" ���������ǻȤäƤ��뤬�����ν겿�������ʤ��ʤ������FORTRAN �ʳ�����ʬ�Ǥϲ����ѹ���ʤ��Ϥ��Ǥ���ˡ�FORTRAN �ؿ���ޤඦͭ�饤�֥�꡼������ʤ������ʥߥå������ɤǤ���Τǻ��Ǥɤ�����Ǥ��롣�ȤϤ��������Τ⼫����Ǥ�ʤ��Ȥ��Τ⼫����Ǥ��
 
 

[2] ���ϥץ�����೫ȯ�ᶷ

TObjArray ��Ѿ����������åȥ��饹��Ȥä������åȥե�������������󥿡��ץ꥿���⡼�ɡ�RCINT�ˤǤ��ޤ�ư���ʤ��ä�����ϡ����å��֥롦�������ĥ٥��������饹��¿�ŷѾ��Υץ饤����ƥ�����

    class LockableLVector :  public Lockable, public LVector;

����

    class LockableLVector : public LVector, public Lockable

���ѹ��������褷����

��ͳ��Ĵ�٤Ƥ��ʤ�����

    class Lockable        ��Root Object�Ǥʤ���
    class LVector         ��Root Object �Ĥޤ� TObject ��Ѿ���

�ʤΤǡ�¿�ŷѾ��Ǥ� Root Object ������֤�ɬ�פ�����褦�Ǥ��롣

�����åȥե���������λȤ���

�����åȥե���������ϡ�TObjArray tracks �����٥����Υȥ�å��� LockableLVector �Υ��쥤�Ȥ���

Double_t ycut = 0.001;                  // ycut ������
ANLJadeEJetFinder jclust(ycut);         // JetFinder �Υ��󥹥��󥹤�����
jclust.Initialize(tracks);              // ���饹����󥰤��� track �򥻥å�
jclust.FindJets();                      // Ϳ����줿 ycut �ǥ����åȥ��饹����󥰤�¹�

Int_t njets = 6;                        // �����åȤ��ܿ������
jclust.FrorceNJets(njets);              // �����ܿ��ˤʤ�褦�� ycut ��Ĵ��

�Τ褦�˻Ȥ���jclust.FindJets() ���餺�ˤ����ʤ� jclust.FrorceNJets(njets) �򤷤Ƥ�褤��

�����åȥե�����ǥ��󥰤η�̤�

TObjArray &jets = jclust.GetJets();     // ��̤λ��Ȥ� TObjArray �Ȥ����֤��Ƥ�餦
TIter nextjet(&jets);                   // ���� TObjArray �˥����������� iterator ������
ANLJet *jetPntr;
while ((jetPntr = (ANLJet *)nextjet())) {
  ANLJet &jet = *jetPntr;
  LockableLVector p4jet = jet();        // �����åȤΣ�����ư�̤����
  histEjet->Fill(p4jet.E());            // �����åȤΥ��ͥ륮���Υҥ��ȥ�����ե���
  .....
}
�Τ褦�˻Ȥ��롣���ߡ�������ؤ��Ӿ���ȤȤ�ˡ���Ω��ץȥ󸡽С����åȡ����٥�ȥ������ס�����¾�β����ѥ��饹��ȯ�档����ν���꤯�餤�ˤϥ١����Ǥ��꡼��ͽ�ꡣ���θ�ϡ�¬��亮�ߥ�졼���������٥�ȥ����ͥ졼�����ȿʤ�Ĥ�ꡣ
 


Back to Keisuke Fujii's MkLinux/LinuxPPC Life