
| Line: 1 to 1 | ||||||||
|---|---|---|---|---|---|---|---|---|
| ||||||||
| Line: 27 to 27 | ||||||||
| Added: | ||||||||
| > > | Packed ntuple trick: jmohep(i)=mod(isthep(i),100)*4000*4000 + jmohep(1,i)*4000+jmohep(2,i) jdahep(i)=mod(isthep(j)/100,100)*4000*4000+jdahep(1,i)*4000+jdahep(2,i) | |||||||
Writing ntuplesWriting such an ntuple is straightforward in Fortran [TODO: C/C++ interface via cfortran.h], see the attached example program writehbook.f.
| ||||||||