Skip to main content

Converting my comments into an answer:

  • to split your list:

     splitList = Split[list, Last[#2] >= Last[#1] &] 
    

    or

     splitList = Split[list, First[#2] > First[#1] &]
    
  • to then select only those sublists with at least three elements:

     Select[splitList, Length[#] >= 3 &]
    
MarcoB
  • 67.7k
  • 18
  • 96
  • 198