Greek Syllabication (Simplified)
Haskell, 222 201 bytes



s""=[]
s x|c?"ειοιυιαιου"=(a++c):s d|h:e:f:g&lt;-b,e==f=(a++[h,e]):s(f:g)|e:f&lt;-b=(a++[e]):s f|2&gt;1=[a]where(a,b)=break(`elem`"αεηιουω")x;(c,d)=splitAt 2 b 
i?(x:y:z)=i==[x,y]||i?z
i?""=1&gt;2


Try it online!