Parent Directory
|
Revision Log
First GPAMELA release on CVS
| 1 | * |
| 2 | * $Id$ |
| 3 | * |
| 4 | * $Log$ |
| 5 | * |
| 6 | * |
| 7 | * optdata.inc |
| 8 | * |
| 9 | *CMZ : 3.00/00 02/05/2001 20.42.25 by Unknown |
| 10 | *-- Author : |
| 11 | CHARACTER*(MXCHAR) FUNFLD,FUNPOS,FUNWGT |
| 12 | CHARACTER*10 VALTYP,PNTTYP |
| 13 | REAL VST(MXWIRE),VPLST(5) |
| 14 | LOGICAL EVALT,EVALD,EVALA |
| 15 | INTEGER NPOINT,NSWIRE,IOPT,NFLD,NPOS,NWGT,IENFLD,IENPOS,IENWGT |
| 16 | COMMON /OPTDAT/ VST,VPLST,NPOINT,NSWIRE,IOPT,NFLD,NPOS,NWGT, |
| 17 | - IENFLD,IENPOS,IENWGT,EVALT,EVALD,EVALA |
| 18 | COMMON /OPTCHR/ FUNFLD,FUNPOS,FUNWGT,VALTYP,PNTTYP |
| ViewVC Help | |
| Powered by ViewVC 1.1.23 |