(file) Return to gen_pawspace.cmn CVS log (file) (dir) Up to [HallC] / Analyzer / INCLUDE

 1 cdaq  1.1 **************** begin: gen_pawspace.cmn **********************
 2 cdaq  1.2 *     $Log: gen_pawspace.cmn,v $
 3           * Revision 1.1  1994/02/07  19:41:18  cdaq
 4           * Initial revision
 5           *
 6 cdaq  1.1 *    
 7           *-sizes of CERNLIB working space
 8           *
 9                 INTEGER G_sizeHBOOK,G_sizeHIGZ,G_sizeKUIP,G_sizePAW
10 cdaq  1.2       PARAMETER (G_sizeHBOOK= 1000000)
11 cdaq  1.1       PARAMETER (G_sizeHIGZ=   50000)
12                 PARAMETER (G_sizeKUIP=   75000)
13                 PARAMETER (G_sizePAW=G_sizeHIGZ+G_sizeKUIP+
14                &                      G_sizeHBOOK+100000)
15           *
16           *-CERNLIB working space
17           *
18                   integer G_CERNmemory(G_sizePAW)
19           	COMMON /PAWC/ G_CERNmemory	!special nonstandard name!
20           *
21           **************** end: gen_pawspace.cmn **********************
22           *     Local Variables:
23           *     mode: fortran
24           *     End:

Analyzer/Replay: Mark Jones, Documents: Stephen Wood
Powered by
ViewCVS 0.9.2-cvsgraph-1.4.0