/FORTRAN |
---|
Interface to MINUIT, COMIS, SIGMA and FORTRAN Input/Output.
/FORTRAN/HMINUIT |
---|
To input commands for Interactive MINUIT in a macro. Example:
/FORTRAN/COMIS |
---|
Invoke the COMIS FORTRAN interpreter. COMIS allows to execute FORTRAN
routines without recompiling and relinking. It communicates with PAW
commands through vectors and functions. COMIS has its PAW-independent
command structure. Example in command mode:
COMIS code may be inserted into a macro. Example:
/FORTRAN/CALL urout |
---|
UROUT | C | User routine |
Execute the routine UROUT. UROUT may be a routine compiled and linked with PAW. For example : CALL HPRINT(10).
UROUT may also be the name of a file which can be edited interactively with
the command EDIT. For example if file UROUT.FOR contains:
Then one can type CALL UROUT.FOR(10). The routine UROUT may also contain references to the library routines mentioned below.
The functions $CALL, $ICALL, and $DCALL allow to call REAL, INTEGER, and
DOUBLE PRECISION functions, respectively. The function call must be
enclosed in quotes, for example:
with file fun.f containing
The following routines from the CERN Program Library can be called:
/FORTRAN/UNITS |
---|
List all Input/Output logical units currently open. The files attached to them are also shown.
/FORTRAN/LOOP ntimes urout |
---|
NTIMES | I | Number of calls D=1 |
UROUT | C | User routine |
The routine UROUT is called NTIMES times. See command CALL for explanation of UROUT.
/FORTRAN/FILE lun fname [ status ] |
---|
LUN | I | Logical unit number |
FNAME | C | File name |
STATUS | C | File status D='DONTKNOW' |
STATUS:
'OLD' | Open existing file for reading. |
'APPEND' | Open existing file and position at EOF. |
'NEW' | Create new file; error if already existing. |
'UNKNOWN' | Open existing or create new file. |
'DONTKNOW' | Like UNKNOWN except on VMS opens highest cycle. |
Open a FORTRAN formatted text file. UNKNOWN opens a file for write access without flagging an error if the file already exists. On VMS a new cycle is created. DONTKNOW is the same as UNKNOWN except on VMS where the highest cycle is opened. This option should be used if it is not yet known whether the file will be read or written.
/FORTRAN/CLOSE lun |
---|
LUN | I | Logical unit number R=0:128 |
Close the file on unit LUN. If the file has been opened with HISTO/FILE, PICTURE/FILE, etc, then before closing the unit, PAW will close correctly the file with CALL HREND or FZENDI(O), ICLWK, etc. Giving 0 as unit will close all open files.
/FORTRAN/REWIND lun |
---|
LUN | I | Logical unit number R=1:128 |
Rewind the file on unit LUN.
/FORTRAN/SIGMA [ expr ] |
---|
EXPR | C | Expression D=' ' |
Invoke the SIGMA package. SIGMA is an array manipulation package using its own vector-oriented language, outside the PAW command conventions. SIGMA may be invoked in one of the three following ways:
1- Using the KUIP $SIGMA function. Example:
2- Using the SIGMA command. Example:
3- Using the APPLication command. Example: