22.05.2014 Views

CERN Program Library Long Writeup W5013 - CERNLIB ...

CERN Program Library Long Writeup W5013 - CERNLIB ...

CERN Program Library Long Writeup W5013 - CERNLIB ...

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

9 GEANT/FZ<br />

ZEBRA/FZ commands<br />

9.1 FZIN lun keysu [ ident ]<br />

LUN I “Fortran unit of the FZ file”<br />

KEYSU C “Name of the data structure to be retrieved”<br />

IDENT I “Version of the data structure to be retrieved” D=0<br />

Equivalent to a call to:<br />

CALL GFIN(LUN,KEYSU,1,IDENT,’ ’,IER)<br />

9.2 FZOPEN lun file luntyp len [ chopt ]<br />

LUN I “Fortran unit with which to open the file”<br />

FILE C “Name of the file to be opened”<br />

LUNTYP C “Type of FZ file to be opened by GOPEN” D=’XI’<br />

LEN I “Recordlenght of the file” D=0<br />

CHOPT C “Optional parameter to specify the action” D=’␣’<br />

Equivalent to a call to:<br />

CALL GOPEN(LUN,FILE,LUNTYP,LEN,IER)<br />

If CHOPT = I then a call to GFIN or GFOUT will be performed in addition according to the value of<br />

LUNTYP, with the key INIT to save or retrieve the whole initialization data structure.<br />

9.3 FZOUT lun keysu [ ident ]<br />

LUN I “Fortran unit of the FZ file”<br />

KEYSU C “Name of the data structure to be saved”<br />

IDENT I “Version of the data structure to be saved” D=1<br />

Equivalent to a call to:<br />

9.4 FZCLOSE lun<br />

CALL GFOUT(LUN,KEYSU,1,IDENT,’ ’,IER)<br />

LUN I “Fortran unit of the FZ to close”<br />

Equivalent to a call to:<br />

CALL GCLOSE(LUN,IER)<br />

395 XINT002 – 39

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!