19 |
c right:xkorr=par(1)*exp(x/par(2)) |
c right:xkorr=par(1)*exp(x/par(2)) |
20 |
c then:adc(x,right/left)=adc(x,right/left)/xkorr |
c then:adc(x,right/left)=adc(x,right/left)/xkorr |
21 |
c normalize to x=0 (middle of paddle) |
c normalize to x=0 (middle of paddle) |
22 |
REAL adcx11(2,8,2),adcx12(2,6,2) |
REAL adcx11(2,8,4),adcx12(2,6,4) |
23 |
REAL adcx21(2,2,2),adcx22(2,2,2) |
REAL adcx21(2,2,4),adcx22(2,2,4) |
24 |
REAL adcx31(2,3,2),adcx32(2,3,2) |
REAL adcx31(2,3,4),adcx32(2,3,4) |
25 |
|
|
26 |
|
|
27 |
c Time Walk - correction |
c Time Walk - correction |