Log entry time 18:32:34 on December 12, 2006

Entry number 190598

****************************
 Run Number: 1469
 End of Run Comment:
Run_type=3He Production,target_type=3He 20cm,target_colli=out,beam_e0=3.307,beam_raster=on,beam_halfwaveplate=in,leftarm_p=2.849,leftarm_theta=28.793,rightarm_p=0.7843,rightarm_theta=60.807,comment_text=kinematics 7  Q2=61 production, 85uA , ped. substr. on, ps2=7800 ps4=780
 

can't read "map(trigger-6,1)": no such element in array
    (parsing index for array "scal")
    invoked from within
"expr $scal($map(trigger-$t,$h)..."
    invoked from within
"set  trigger_real($t,$h)   [ expr $scal($map(trigger-$t,$h)..."
    ("foreach" body line 2)
    invoked from within
"foreach t $scalerinfo(triglist) { 
	    set  trigger_real($t,$h)   [ expr $scal($map(trigger-$t,$h))          ]
            if { $ps($t) != 0 } {
  	     set  trigger($t,$h)        [ expr $scal($map(trigger-$t,$h))/ ( $ps($t) )  ]
            } else {
             set  trigger($t,$h) 0
	    }
	}"
    ("foreach" body line 4)
    invoked from within
"foreach h { 1 0 -1 } {
	set trigtot($h)      0
	set acc_trigtot($h) 0 
	foreach t $scalerinfo(triglist) { 
	    set  trigger_real($t,$h)   [ expr $scal($map(trigger-$t,$h))          ]
            if { $ps($t) != 0 } {
  	     set  trigger($t,$h)        [ expr $scal($map(trigger-$t,$h))/ ( $ps($t) )  ]
            } else {
             set  trigger($t,$h) 0
	    }
	}
	set trigacc($h)  $scal($map(TS-accept,$h))
	set clock($h)    $scal($map(clock,$h)) 

# Nov 2006:  account for correlations.  
# Every T5 is a T1,T3. 

        set t5corr $trigger(5,$h)

	foreach t $scalerinfo(triglist) { 
            set tcorr 0
            if { $t == 1 } {
               set tcorr $t5corr
	    } 
            if { $t == 3 } {
               set tcorr $t5corr
	    } 
	    set  trigtot($h) [ expr $trigtot($h) + $scal($map(trigger-$t,$h))/($ps($t)+0.0001) - $tcorr/($ps($t)+0.0001)  ]
 	} 

	set hvf(u1,$h)  $scal($map(bcm_u1,$h))
	set hvf(u3,$h)  $scal($map(bcm_u3,$h))
	set hvf(u10,$h) $scal($map(bcm_u10,$h))
	set hvf(d1,$h)  $scal($map(bcm_d1,$h))
	set hvf(d3,$h)  $scal($map(bcm_d3,$h))
	set hvf(d10,$h) $scal($map(bcm_d10,$h))
    }"
    (procedure "halla_scaler_process" line 136)
    invoked from within
"halla_scaler_process .mid.tex scalerinfo "

****************************
End-of-run EPICS data for Run Number 1469 at Tue Dec 12 18:32:34 EST 2006

Wien angle : 90.0431
Half-wave plate (off=out) : IN