source: PSPA/transportPSPA/trunk/include/ELM26A.CIN @ 452

Last change on this file since 452 was 15, checked in by lemeur, 12 years ago

transport pspa initial

File size: 492 bytes
Line 
1C ELM26A              WHICH PHYSICAL PARAMETERS HAVE RANDOM VARIATIONS
2C
3C DPAR      VARIATION IN PARAMETER
4C TYPER     TYPE CODE OF ELEMENT WITH VARIED PARAMETER
5C NPAR      NUMBER OF PARAMETER TO BE VARIED
6C RANZC     INDICATOR IF BEAM LINE CONTAINS RANDOMIZED PARAMETERS
7C RANZD     INDICATOR IF ELEMENT CONTAINS RANDOMIZED PARAMETERS
8C
9      INTEGER         TYPER, NPAR
10      LOGICAL         RANZC, RANZD
11      REAL            DPAR
12C
13      COMMON /ELM26A/ DPAR, TYPER, NPAR, RANZC, RANZD
Note: See TracBrowser for help on using the repository browser.