Relinking PAW on VM/CMS systems

The following section describes how to relink PAW on systems running VM/XA or VM/ESA. It assumes that the CERN libraries, e.g. PACKLIB, PAWLIB, are already installed on your system.

General requirements

• VS-FORTRAN 2.x (our libraries are generated with 2.5.0)
• IBM C/370 2.1.0 (not compatible with Waterloo C)
• TCP/IP 2.1 (if you want to use the "rlogin" facility in PAW)
• GKS, GDDM or X11 graphics libraries
• C run time library

Extracting the main program

The main program can be extracted as shown below:

Extracting the PAW main program

/* Extract PAWMAIN */
/* PAWMAIN EXEC    */
queue "+USE,CZ."
queue "+USE,MAIN."
queue "+USE,P=PAW,D=0PAMAIN."
queue "+EXE."
queue "+KEEP,PAWSIZ."
queue "      PARAMETER (NWPAW=500000)"
queue "+PAM,11,T=C."
queue "+QUIT."
exec        ypatchy,
            'pam="PAW CAR *"',
            'asm="PAWMAIN FORTRAN"'

This results in the following Fortran file:

PAW main program

*CMZ :  2.04/08 30/11/93  14.07.07  by  Rene Brun
*-- Author :    Rene Brun   03/01/89
      PROGRAM PAMAIN
*
*        MAIN Program for basic PAW
*
      PARAMETER (NWPAW=500000)
*
      COMMON/PAWC/PAWCOM(NWPAW)
*
      CALL PAW(NWPAW,IWTYP)
*
      CALL KUWHAG
*
      CALL PAEXIT
*
      STOP
      END
      SUBROUTINE QNEXT
      END

The ENDMODU routine shown below is used in order to reduce the size of the PAW module.

ENDMODU FORTRAN

      BLOCK DATA ENDMODU
      END

Building the GKS version of PAW

This requires the GTS-GRAL GKS software, which is installed and distributed by CERN.

Building the GKS version of PAW

 VFORT PAWMAIN
 VFORT ENDMODU 
 CERNLIB PAWLIB GRAFLIB ( GTS2D LINK
 LOAD PAWMAIN ( CLEAR NOAUTO
 INCLUDE ENDMODU
 GENMOD PAWGKS  ( FROM PAMAIN TO ENDMODU RMODE ANY AMODE ANY