checkj2 :: PhyEventNoTauNoBJet -> (Bool,Bool)
checkj2 ev = let etalst = jetetas ev
             in case etalst of 
                  x1:x2:x3:x4:xs -> let b1 = abs x1 < 1.5 && abs x2 < 1.5 && abs x3 < 1.5 && abs x4 < 1.5
                                    in case xs of
                                         y1:y2:ys -> let b2 = abs y1 <2.5 && abs y2 < 2.5
                                                     in (b1,b2)
                                         _ -> (b1,False)
                  _ -> (False,False)
checkj2 :: PhyEventNoTauNoBJet -> (Bool,Bool)
checkj2 ev = let etalst = jetetas ev
             in case etalst of 
                  x1:x2:x3:x4:xs -> let b1 = abs x1 < 1.5 && abs x2 < 1.5 && abs x3 < 1.5 && abs x4 < 1.5
                                    in case xs of
                                         y1:y2:ys -> let b2 = abs y1 <2.5 && abs y2 < 2.5
                                                     in (b1,b2)
                                         _ -> (b1,False)
                  _ -> (False,False)
checkj2 ev = let etalst = jetetas ev
             in case etalst of 
                  x1:x2:x3:x4:xs -> let b1 = abs x1 < 1.5 && abs x2 < 1.5 && abs x3 < 1.5 && abs x4 < 1.5
                                    in case xs of
                                         y1:y2:ys -> let b2 = abs y1 <2.5 && abs y2 < 2.5
                                                     in (b1,b2)
                                         _ -> (b1,False)
                  _ -> (False,False)