Parent Directory | Revision Log
Neutron detector added. Geometry and GPCALOR package
1 | cafagna | 1.1 | *KEEP,CBERT3. |
2 | REAL*8 TAPCRS(29850),DUME1(4679),CURR(11),DUME2(169),DUME3(35) | ||
3 | COMMON/CBERT/ DUME1,CURR,DUME2, | ||
4 | + RANDS(4),DUME3,TAPCRS | ||
5 | INTEGER *2 RANDS | ||
6 | C |
ViewVC Help | |
Powered by ViewVC 1.1.23 |