FBOOKQ COMMENTS
*-- Author :    John V. Morris
      SUBROUTINE FBOOKQ
      CALL HTABLE(1,'Cell No. (0-31) vs Wire Plane (1-36)$',                                           
      CALL HBOOK1(2,'HIT MULTIPLICITY/CELL$',50,-0.5,49.5,0.)                                          
      CALL HBOOK1(3,'RAW D-TIME ALL HITS  $',100,0.,2000.,0.)                                          
      CALL HBOOK1(7,'INTER-HIT TIME;ALL HITS$',100,0.,1000.,0.)                                        
      CALL HBOOK1(8,'INTER-HIT TIME;SM0     $',100,0.,1000.,0.)                                        
      CALL HBOOK1(9,'INTER-HIT TIME;SM1     $',100,0.,1000.,0.)                                        
      CALL HBOOK1(10,'INTER-HIT TIME;SM2     $',100,0.,1000.,0.)                                       
      CALL HBOOK2(11,'LN(Q) V T FOR ALL HITS$',                                                        
      CALL HBOOK1(13,'Ln(Q) for all hits$',  30,4.,10.  ,0.)                                           
      CALL HBOOK1(14,'Ln(Q) for   WIRE 1$',  30,4.,10.  ,0.)                                           
      CALL HBOOK1(15,'Ln(Q) for   WIRE 2$',  30,4.,10.  ,0.)                                           
      CALL HBOOK1(16,'Ln(Q) for   WIRE 3$',  30,4.,10.  ,0.)                                           
      CALL HBOOK1(17,'Ln(Q) for   WIRE 4$',  30,4.,10.  ,0.)                                           
      CALL HBOOK1(18,'Ln(Q) FOR ID=5011$', 30,4.,10.,0.)                                               
      CALL HBOOK1(19,'Ln(Q) FOR SM0    $', 30,4.,10.,0.)                                               
      CALL HBOOK1(20,'Ln(Q) FOR SM1    $', 30,4.,10.,0.)                                               
      CALL HBOOK1(21,'Ln(Q) FOR SM2    $', 30,4.,10.,0.)                                               
      CALL HBOOK1(22,'CLASS I 4-hit twin peaks TOTAL$', 34,-51.,51.,0.)                                
      CALL HBOOK1(23,'CLASS I 4-hit twin peaks MOD 0$', 34,-51.,51.,0.)                                
      CALL HBOOK1(24,'CLASS I 4-hit twin peaks MOD 1$', 34,-51.,51.,0.)                                
      CALL HBOOK1(25,'CLASS I 4-hit twin peaks MOD 2$', 34,-51.,51.,0.)                                
      CALL HBOOK1(26,'CLASS I 4-hit twin peaks LAY 0$', 34,-51.,51.,0.)                                
      CALL HBOOK1(27,'CLASS I 4-hit twin peaks LAY 1$', 34,-51.,51.,0.)                                
      CALL HBOOK1(28,'CLASS I 4-hit twin peaks LAY 2$', 34,-51.,51.,0.)                                
      CALL HBOOK1(29,'CLASS I 4-hit twin peaks LAY 3$', 34,-51.,51.,0.)                                
      CALL HBOOK1(30,'CLASS I 4-hit twin peaks LAY 4$', 34,-51.,51.,0.)                                
      CALL HBOOK1(31,'CLASS I 4-hit twin peaks LAY 5$', 34,-51.,51.,0.)                                
      CALL HBOOK1(32,'CLASS I 4-hit twin peaks LAY 6$', 34,-51.,51.,0.)                                
      CALL HBOOK1(33,'CLASS I 4-hit twin peaks LAY 7$', 34,-51.,51.,0.)                                
      CALL HBOOK1(34,'CLASS I 4-hit twin peaks LAY 8$', 34,-51.,51.,0.)                                
      CALL HBOOK1(1022,'MULTI 1 3-hit twin peaks TOTAL$',34,-51.,51.,0.)                               
      CALL HBOOK1(1023,'MULTI 1 3-hit twin peaks MOD 0$',34,-51.,51.,0.)                               
      CALL HBOOK1(1024,'MULTI 1 3-hit twin peaks MOD 1$',34,-51.,51.,0.)                               
      CALL HBOOK1(1025,'MULTI 1 3-hit twin peaks MOD 2$',34,-51.,51.,0.)                               
      CALL HBOOK1(1026,'MULTI 1 3-hit twin peaks LAY 0$',34,-51.,51.,0.)                               
      CALL HBOOK1(1027,'MULTI 1 3-hit twin peaks LAY 1$',34,-51.,51.,0.)                               
      CALL HBOOK1(1028,'MULTI 1 3-hit twin peaks LAY 2$',34,-51.,51.,0.)                               
      CALL HBOOK1(1029,'MULTI 1 3-hit twin peaks LAY 3$',34,-51.,51.,0.)                               
      CALL HBOOK1(1030,'MULTI 1 3-hit twin peaks LAY 4$',34,-51.,51.,0.)                               
      CALL HBOOK1(1031,'MULTI 1 3-hit twin peaks LAY 5$',34,-51.,51.,0.)                               
      CALL HBOOK1(1032,'MULTI 1 3-hit twin peaks LAY 6$',34,-51.,51.,0.)                               
      CALL HBOOK1(1033,'MULTI 1 3-hit twin peaks LAY 7$',34,-51.,51.,0.)                               
      CALL HBOOK1(1034,'MULTI 1 3-hit twin peaks LAY 8$',34,-51.,51.,0.)                               
      CALL HBOOK1(2022,'MULTI 0 3-hit twin peaks TOTAL$',34,-51.,51.,0.)                               
      CALL HBOOK1(2023,'MULTI 0 3-hit twin peaks MOD 0$',34,-51.,51.,0.)                               
      CALL HBOOK1(2024,'MULTI 0 3-hit twin peaks MOD 1$',34,-51.,51.,0.)                               
      CALL HBOOK1(2025,'MULTI 0 3-hit twin peaks MOD 2$',34,-51.,51.,0.)                               
      CALL HBOOK1(2026,'MULTI 0 3-hit twin peaks LAY 0$',34,-51.,51.,0.)                               
      CALL HBOOK1(2027,'MULTI 0 3-hit twin peaks LAY 1$',34,-51.,51.,0.)                               
      CALL HBOOK1(2028,'MULTI 0 3-hit twin peaks LAY 2$',34,-51.,51.,0.)                               
      CALL HBOOK1(2029,'MULTI 0 3-hit twin peaks LAY 3$',34,-51.,51.,0.)                               
      CALL HBOOK1(2030,'MULTI 0 3-hit twin peaks LAY 4$',34,-51.,51.,0.)                               
      CALL HBOOK1(2031,'MULTI 0 3-hit twin peaks LAY 5$',34,-51.,51.,0.)                               
      CALL HBOOK1(2032,'MULTI 0 3-hit twin peaks LAY 6$',34,-51.,51.,0.)                               
      CALL HBOOK1(2033,'MULTI 0 3-hit twin peaks LAY 7$',34,-51.,51.,0.)                               
      CALL HBOOK1(2034,'MULTI 0 3-hit twin peaks LAY 8$',34,-51.,51.,0.)                               
      CALL HBOOK2(38,'RAW D-TIME DOS/BACK  $', 40,800.,1200.                                           
      CALL HBSLIX(38,13,0.0)                                                                           
      CALL HBOOK2(39,'RAW D-TIME DOS/FRONT $', 40, 80., 280.                                           
      CALL HBSLIX(39,13,0.0)                                                                           
      CALL HBOOK1(138,'RAW D-TIME DOS/BACK  $', 40,800.,1200.,0.)                                      
      CALL HBOOK1(139,'RAW D-TIME DOS/BACK  $', 40,800.,1200.,0.)                                      
      CALL HBOOK1(140,'RAW D-TIME DOS/BACK  $', 40,800.,1200.,0.)                                      
      CALL HBOOK1(141,'RAW D-TIME DOS/BACK  $', 40,800.,1200.,0.)                                      
      CALL HBOOK1(142,'RAW D-TIME DOS/BACK  $', 40,800.,1200.,0.)                                      
      CALL HBOOK1(143,'RAW D-TIME DOS/BACK  $', 40,800.,1200.,0.)                                      
      CALL HBOOK1(144,'RAW D-TIME DOS/BACK  $', 40,800.,1200.,0.)                                      
      CALL HBOOK1(145,'RAW D-TIME DOS/BACK  $', 40,800.,1200.,0.)                                      
      CALL HBOOK1(146,'RAW D-TIME DOS/BACK  $', 40,800.,1200.,0.)                                      
      CALL HBOOK1(147,'RAW D-TIME DOS/BACK  $', 40,800.,1200.,0.)                                      
      CALL HBOOK1(148,'RAW D-TIME DOS/BACK  $', 40,800.,1200.,0.)                                      
      CALL HBOOK1(149,'RAW D-TIME DOS/BACK  $', 40,800.,1200.,0.)                                      
      CALL HBOOK1(150,'RAW D-TIME DOS/BACK  $', 40,800.,1200.,0.)                                      
      CALL HBOOK1(151,'RAW D-TIME DOS/FRONT $', 40, 80., 280.,0.)                                      
      CALL HBOOK1(152,'RAW D-TIME DOS/FRONT $', 40, 80., 280.,0.)                                      
      CALL HBOOK1(153,'RAW D-TIME DOS/FRONT $', 40, 80., 280.,0.)                                      
      CALL HBOOK1(154,'RAW D-TIME DOS/FRONT $', 40, 80., 280.,0.)                                      
      CALL HBOOK1(155,'RAW D-TIME DOS/FRONT $', 40, 80., 280.,0.)                                      
      CALL HBOOK1(156,'RAW D-TIME DOS/FRONT $', 40, 80., 280.,0.)                                      
      CALL HBOOK1(157,'RAW D-TIME DOS/FRONT $', 40, 80., 280.,0.)                                      
      CALL HBOOK1(158,'RAW D-TIME DOS/FRONT $', 40, 80., 280.,0.)                                      
      CALL HBOOK1(159,'RAW D-TIME DOS/FRONT $', 40, 80., 280.,0.)                                      
      CALL HBOOK1(160,'RAW D-TIME DOS/FRONT $', 40, 80., 280.,0.)                                      
      CALL HBOOK1(161,'RAW D-TIME DOS/FRONT $', 40, 80., 280.,0.)                                      
      CALL HBOOK1(162,'RAW D-TIME DOS/FRONT $', 40, 80., 280.,0.)                                      
      CALL HBOOK1(163,'RAW D-TIME DOS/FRONT $', 40, 80., 280.,0.)                                      
      CALL HTABLE(40,'Wedge Pair No*2+- (0-47) vs Wire Plane (1-36)$',                                 
      CALL HBOOK1(41,'HIT MULTIPLICITY/CELL$',30,-0.5,29.5,0.)                                         
      CALL HBOOK1(42,'RAW D-TIME ALL HITS  $',100,0.,2000.,0.)                                         
      CALL HBOOK1(44,'Radius     ALL HITS  $',80,-80.0,80.0,0.)                                        
      CALL HBOOK1(45,'ABS(Radius) ALL HITS  $',80,0.0,80.0,0.)                                         
      CALL HBOOK2(46,' Drift T vs Radius ALL HITS$',                                                   
      CALL HBOOK1(49,'INTER-HIT TIME;ALL HITS$',100,0.,1000.,0.)                                       
      CALL HBOOK1(50,'INTER-HIT TIME;SM0     $',100,0.,1000.,0.)                                       
      CALL HBOOK1(51,'INTER-HIT TIME;SM1     $',100,0.,1000.,0.)                                       
      CALL HBOOK1(52,'INTER-HIT TIME;SM2     $',100,0.,1000.,0.)                                       
      CALL HBOOK2(53,'LN(Q) V T FOR ALL HITS$',                                                        
      CALL HBOOK1(54,'LN(Q) FOR ALL HITS$',30,4.,10.,0.)                                               
      CALL HBOOK1(55,'Ln(Q) for all hits$',   30,4.,10.  ,0.)                                          
      CALL HBOOK1(56,'Ln(Q)       WIRE  1$',  30,4.,10.  ,0.)                                          
      CALL HBOOK1(57,'Ln(Q)       WIRE  2$',  30,4.,10.  ,0.)                                          
      CALL HBOOK1(58,'Ln(Q)       WIRE  3$',  30,4.,10.  ,0.)                                          
      CALL HBOOK1(59,'Ln(Q)       WIRE  4$',  30,4.,10.  ,0.)                                          
      CALL HBOOK1(60,'Ln(Q)       WIRE  5$',  30,4.,10.  ,0.)                                          
      CALL HBOOK1(61,'Ln(Q)       WIRE  6$',  30,4.,10.  ,0.)                                          
      CALL HBOOK1(62,'Ln(Q)       WIRE  7$',  30,4.,10.  ,0.)                                          
      CALL HBOOK1(63,'Ln(Q)       WIRE  8$',  30,4.,10.  ,0.)                                          
      CALL HBOOK1(64,'Ln(Q)       WIRE  9$',  30,4.,10.  ,0.)                                          
      CALL HBOOK1(65,'Ln(Q)       WIRE 10$',  30,4.,10.  ,0.)                                          
      CALL HBOOK1(66,'Ln(Q)       WIRE 11$',  30,4.,10.  ,0.)                                          
      CALL HBOOK1(67,'Ln(Q)       WIRE 12$',  30,4.,10.  ,0.)                                          
      CALL HBOOK1(68,'Q FOR ID=  72$', 50,0.,5000.,0.)                                                 
      CALL HBOOK1(69,'Q FOR SM0    $', 50,0.,5000.,0.)                                                 
      CALL HBOOK1(70,'Q FOR SM1    $', 50,0.,5000.,0.)                                                 
      CALL HBOOK1(71,'Q FOR SM2    $', 50,0.,5000.,0.)                                                 
      CALL HBOOK1(72,'CLASS I 4-hit twin peaks ALL  $', 34,-51.,51.,0.)                                
      CALL HBOOK1(73,'CLASS I 4-hit twin peaks MOD 0$', 34,-51.,51.,0.)                                
      CALL HBOOK1(74,'CLASS I 4-hit twin peaks MOD 1$', 34,-51.,51.,0.)                                
      CALL HBOOK1(75,'CLASS I 4-hit twin peaks MOD 2$', 34,-51.,51.,0.)                                
      CALL HBOOK1(76,'CLASS I 4-hit twin peaks LAY 0$', 34,-51.,51.,0.)                                
      CALL HBOOK1(77,'CLASS I 4-hit twin peaks LAY 1$', 34,-51.,51.,0.)                                
      CALL HBOOK1(78,'CLASS I 4-hit twin peaks LAY 2$', 34,-51.,51.,0.)                                
      CALL HBOOK1(79,'CLASS I 4-hit twin peaks LAY 3$', 34,-51.,51.,0.)                                
      CALL HBOOK1(80,'CLASS I 4-hit twin peaks LAY 4$', 34,-51.,51.,0.)                                
      CALL HBOOK1(81,'CLASS I 4-hit twin peaks LAY 5$', 34,-51.,51.,0.)                                
      CALL HBOOK1(82,'CLASS I 4-hit twin peaks LAY 6$', 34,-51.,51.,0.)                                
      CALL HBOOK1(83,'CLASS I 4-hit twin peaks LAY 7$', 34,-51.,51.,0.)                                
      CALL HBOOK1(84,'CLASS I 4-hit twin peaks LAY 8$', 34,-51.,51.,0.)                                
      CALL HBOOK1(1072,'MULTI 1 3-hit twin peaks ALL  $',34,-51.,51.,0.)                               
      CALL HBOOK1(1073,'MULTI 1 3-hit twin peaks MOD 0$',34,-51.,51.,0.)                               
      CALL HBOOK1(1074,'MULTI 1 3-hit twin peaks MOD 1$',34,-51.,51.,0.)                               
      CALL HBOOK1(1075,'MULTI 1 3-hit twin peaks MOD 2$',34,-51.,51.,0.)                               
      CALL HBOOK1(1076,'MULTI 1 3-hit twin peaks LAY 0$',34,-51.,51.,0.)                               
      CALL HBOOK1(1077,'MULTI 1 3-hit twin peaks LAY 1$',34,-51.,51.,0.)                               
      CALL HBOOK1(1078,'MULTI 1 3-hit twin peaks LAY 2$',34,-51.,51.,0.)                               
      CALL HBOOK1(1079,'MULTI 1 3-hit twin peaks LAY 3$',34,-51.,51.,0.)                               
      CALL HBOOK1(1080,'MULTI 1 3-hit twin peaks LAY 4$',34,-51.,51.,0.)                               
      CALL HBOOK1(1081,'MULTI 1 3-hit twin peaks LAY 5$',34,-51.,51.,0.)                               
      CALL HBOOK1(1082,'MULTI 1 3-hit twin peaks LAY 6$',34,-51.,51.,0.)                               
      CALL HBOOK1(1083,'MULTI 1 3-hit twin peaks LAY 7$',34,-51.,51.,0.)                               
      CALL HBOOK1(1084,'MULTI 1 3-hit twin peaks LAY 8$',34,-51.,51.,0.)                               
      CALL HBOOK1(2072,'MULTI 0 3-hit twin peaks ALL  $',34,-51.,51.,0.)                               
      CALL HBOOK1(2073,'MULTI 0 3-hit twin peaks MOD 0$',34,-51.,51.,0.)                               
      CALL HBOOK1(2074,'MULTI 0 3-hit twin peaks MOD 1$',34,-51.,51.,0.)                               
      CALL HBOOK1(2075,'MULTI 0 3-hit twin peaks MOD 2$',34,-51.,51.,0.)                               
      CALL HBOOK1(2076,'MULTI 0 3-hit twin peaks LAY 0$',34,-51.,51.,0.)                               
      CALL HBOOK1(2077,'MULTI 0 3-hit twin peaks LAY 1$',34,-51.,51.,0.)                               
      CALL HBOOK1(2078,'MULTI 0 3-hit twin peaks LAY 2$',34,-51.,51.,0.)                               
      CALL HBOOK1(2079,'MULTI 0 3-hit twin peaks LAY 3$',34,-51.,51.,0.)                               
      CALL HBOOK1(2080,'MULTI 0 3-hit twin peaks LAY 4$',34,-51.,51.,0.)                               
      CALL HBOOK1(2081,'MULTI 0 3-hit twin peaks LAY 5$',34,-51.,51.,0.)                               
      CALL HBOOK1(2082,'MULTI 0 3-hit twin peaks LAY 6$',34,-51.,51.,0.)                               
      CALL HBOOK1(2083,'MULTI 0 3-hit twin peaks LAY 7$',34,-51.,51.,0.)                               
      CALL HBOOK1(2084,'MULTI 0 3-hit twin peaks LAY 8$',34,-51.,51.,0.)                               
      CALL HBOOK1(88,'DOS/BACK as F(RAD)  $',NBINR,  0.,  80.,0.)                                      
      CALL HBOOK1(89,'RAW D-TIME DOS/FRONT R < 80 $',60,80., 380.,0.)                                  
       CALL HBOOK1(89+J,'RAW D-TIME DOS/BACK Rbins$',24,300.,1740.,0.)                                 
       CALL HIDOPT(89+J,'PERR')                                                                        
      CALL HBOOK1(170,'Run Statistics$',LENST,GMIN,GMAX,0.)