• Main INDEX
  • Monthly INDEX
  • PREV
  • NEXT

    User name a-onl

    Log entry time 05:50:41 on July 28, 2006

    Entry number 175655

    keyword=End_of_Run_1761
    ****************************
     Run Number: 1761
     End of Run Comment:
    Run_type=Production Gamma D,beam_raster=on,comment_text=Kin Point #1,fpp_door15=Open,fpp_door3=Open,fpp_door6=Open,fpp_door9=Open,leftarm_p=557.7,leftarm_theta=14.00,rightarm_p=0.361,rightarm_theta=28.30,target_radiator=out,target_type=loop2(H) 15cm
     
    
    can't read "map(trigger-7,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)) 
    
    # July 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 107)
        invoked from within
    "halla_scaler_process .mid.tex scalerinfo "
    
    ****************************