See https://elog.ph.ed.ac.uk/AIDA/179
207Bi source, no pulser
Shaping time 8us
Slow comparator 0xa
Fast comparator 0xa
Re-order ASIC <-> MSL type BB18 adaptor PCB J1 connector mapping - see below
C----67---------------------------------------------------------------72------80
FUNCTION bb18order( channel )
INTEGER array( 0:63 ), bb18order, channel
C ASIC # 0 channel # 0 = array(0)
C ASIC # 1 channel # 0 = array(16)
C ASIC # 2 channel # 0 = array(32)
C ASIC # 3 channel # 0 = array(48)
C Array contents correspond to the MSL type BB18 adaptor J1 connector
C strip sequence # 0-63
DATA array /
+ 62, 63, 59, 60, 61, 56, 57, 58, 52, 53, 54, 55, 49, 50, 51, 45,
+ 46, 47, 48, 42, 43, 44, 38, 39, 40, 41, 35, 36, 37, 31, 32, 33,
+ 34, 28, 29, 30, 24, 25, 26, 27, 21, 22, 23, 17, 18, 19, 20, 14,
+ 15, 16, 10, 11, 12, 7, 3, 0, 8, 4, 1, 9, 5, 2, 13, 6 /
bb18order = array( channel )
RETURN
C----67---------------------------------------------------------------72------80
END
C----67---------------------------------------------------------------72------80
Which can be used, for example, as follows:
channel = bb18order( channel )
ch = channel + ( module - 1 ) * 64 + ( range * 2048 )
where channel (ASIC channels # 0-63), module (FEE #) and range (0=LEC/MEC, 1=HEC)
are supplied by the GREAT format data item.
Attachments 1-7 - 2D hit pattern showing which (if any) other channels j are active
( hit(j) = .true. ) in an event (< 410 clock cycles) in addition to channel i
DO i = 640, 767
IF ( hit( i ) ) THEN
DO j = i, 767
IF ( hit( j ) ) THEN
CALL inc2d( 4014, i - 640, j - 640 )
ENDIF
ENDDO
ENDIF
ENDDO
DO i = 768, 895
IF ( hit( i ) ) THEN
DO j = i, 895
IF ( hit( j ) ) THEN
CALL inc2d( 4014, i - 640, j - 640 )
ENDIF
ENDDO
ENDIF
ENDDO
Attachments 1-7 should be compared with the same spectrum shown in https://elog.ph.ed.ac.uk/AIDA/177 |