Rev | Line | |
---|
[15] | 1 | C ELM8E BEAM MATRIX AT BEGINNING OF MISALIGNED SECTIONS |
---|
| 2 | C |
---|
| 3 | C SIOL(3,6,6) SAVED SIGMA MATRIX |
---|
| 4 | C COLD(3,6) SAVED BEAM CENTROID |
---|
| 5 | C RCO(3,6,6) RC TRANSFER MATRIX AT BEGINNING OF MISALIGNED SECTION |
---|
| 6 | C R2O(6,6) R2 TRANSFER MATRIX AT BEGINNING OF MISALIGNED SECTION |
---|
| 7 | C SPO TRUE IF SAVED BEAM CENTROID MAY BE OFF AXIS |
---|
| 8 | C RCPO(3) TRUE IF ACCUMULATION OF RC HAD BEGUN AT BEGINNING OF |
---|
| 9 | C MISALIGNED SECTION |
---|
| 10 | C R2PO TRUE OF ACCUMULATION OF R2 HAD BEGIN AT BEGINNING OF |
---|
| 11 | C MISALIGNED SECTION |
---|
| 12 | C |
---|
| 13 | LOGICAL SPO(3), RCPO(3), R2PO |
---|
| 14 | REAL SIOL(3,6,6), COLD(3,6), RCO(3,6,6), R2O(6,6) |
---|
| 15 | C |
---|
| 16 | COMMON /ELM8E/ SIOL, COLD, RCO, R2O, SPO, RCPO, R2PO |
---|
Note: See
TracBrowser
for help on using the repository browser.