Parent Directory
| 
Revision Log
Convert tracker output from software v3r02. Some small bugs fixed
| 1 | IMPLICIT NONE |
| 2 | REAL DEDX(500),CLSIGNAL(8500),CNEV(12,24) |
| 3 | INTEGER NEV1,NCLSTR1,VIEW(500),LADDER(500),MAXS(500),MULT(500) |
| 4 | & ,INDSTART(500),INDMAX(500),TOTCLLENGTH |
| 5 | LOGICAL GOOD1, crc1(12),cpu_crc1 |
| 6 | * |
| 7 | integer pkt_type1,pkt_num1, obt1 |
| 8 | integer whic_calib1, swcode1 |
| 9 | C |
| 10 | COMMON /trklev1/ GOOD1,NEV1,whic_calib1,swcode1,crc1, |
| 11 | & pkt_type1,pkt_num1, obt1, cpu_crc1, |
| 12 | & NCLSTR1,VIEW,LADDER,MAXS,MULT,DEDX |
| 13 | & ,INDSTART,INDMAX,TOTCLLENGTH,CLSIGNAL,CNEV |
| 14 | SAVE /trklev1/ |
| 15 | |
| 16 | |
| 17 |
| ViewVC Help | |
| Powered by ViewVC 1.1.23 |