;;; -*- Coding: utf-8 -*-  


;;; HAG (Hausa Grammar)

;;; Author: Berthold Crysmann
;;; 2009



;;; Extract tone and length diacritics and represent
;;; as suffixal tonal annotation. 

; Long
! ([^āēīōūáéíóúàèìòùâêîôû ]*)áá([^ _]*)([_HL:*]*) 		 \1a\2_H:\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)éé([^ _]*)([_HL:*]*) 		 \1e\2_H:\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)íí([^ _]*)([_HL:*]*) 		 \1i\2_H:\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)óó([^ _]*)([_HL:*]*) 		 \1o\2_H:\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)úú([^ _]*)([_HL:*]*) 		 \1u\2_H:\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)àà([^ _]*)([_HL:*]*) 		 \1a\2_L:\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)èè([^ _]*)([_HL:*]*) 		 \1e\2_L:\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)ìì([^ _]*)([_HL:*]*) 		 \1i\2_L:\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)òò([^ _]*)([_HL:*]*) 		 \1o\2_L:\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)ùù([^ _]*)([_HL:*]*) 		 \1u\2_L:\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)âā([^ _]*)([_HL:*]*) 		 \1a\2_HL:\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)êē([^ _]*)([_HL:*]*) 		 \1e\2_HL:\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)îī([^ _]*)([_HL:*]*) 		 \1i\2_HL:\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)ôō([^ _]*)([_HL:*]*) 		 \1o\2_HL:\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)ûū([^ _]*)([_HL:*]*) 		 \1u\2_HL:\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)āā([^ _]*)([_HL:*]*) 		 \1a\2_*:\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)ēē([^ _]*)([_HL:*]*) 		 \1e\2_*:\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)īī([^ _]*)([_HL:*]*) 		 \1i\2_*:\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)ōō([^ _]*)([_HL:*]*) 		 \1o\2_*:\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)ūū([^ _]*)([_HL:*]*) 		 \1u\2_*:\3 

; Diphthong
! ([^āēīōūáéíóúàèìòùâêîôû ]*)áí([^ _]*)([_HL:*]*) 		 \1ai\2_H\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)áú([^ _]*)([_HL:*]*) 		 \1au\2_H\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)àì([^ _]*)([_HL:*]*) 		 \1ai\2_L\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)àù([^ _]*)([_HL:*]*) 		 \1au\2_L\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)âū([^ _]*)([_HL:*]*) 		 \1au\2_HL\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)âī([^ _]*)([_HL:*]*) 		 \1ai\2_HL\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)āī([^ _]*)([_HL:*]*) 		 \1ai\2_*\3 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)āū([^ _]*)([_HL:*]*) 		 \1au\2_*\3 

; Short
! ([^āēīōūáéíóúàèìòùâêîôû ]*)á(([^áúí_ ][^ _]*)?)([_HL:*]*) 		 \1a\2_H\4 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)é(([^é_ ][^ _]*)?)([_HL:*]*) 		 \1e\2_H\4 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)í(([^í_ ][^ _]*)?)([_HL:*]*) 		 \1i\2_H\4 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)ó(([^ó_ ][^ _]*)?)([_HL:*]*) 		 \1o\2_H\4 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)ú(([^ú_ ][^ _]*)?)([_HL:*]*) 		 \1u\2_H\4 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)à(([^àùì_ ][^ _]*)?)([_HL:*]*) 		 \1a\2_L\4 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)è(([^è_ ][^ _]*)?)([_HL:*]*) 		 \1e\2_L\4 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)ì(([^ì_ ][^ _]*)?)([_HL:*]*) 		 \1i\2_L\4 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)ò(([^ò_ ][^ _]*)?)([_HL:*]*) 		 \1o\2_L\4 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)ù(([^ù_ ][^ _]*)?)([_HL:*]*) 		 \1u\2_L\4 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)â(([^āūī_ ][^ _]*)?)([_HL:*]*) 		 \1a\2_HL\4 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)ê(([^ē_ ][^ _]*)?)([_HL:*]*) 		 \1e\2_HL\4 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)î(([^ī_ ][^ _]*)?)([_HL:*]*) 		 \1i\2_HL\4 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)ô(([^ô_ ][^ _]*)?)([_HL:*]*) 		 \1o\2_HL\4 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)û(([^ū_ ][^ _]*)?)([_HL:*]*) 		 \1u\2_HL\4 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)ā(([^āūī_ ][^ _]*)?)([_HL:*]*) 		 \1a\2_*\4 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)ē(([^ē_ ][^ _]*)?)([_HL:*]*) 		 \1e\2_*\4 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)ī(([^ī_ ][^ _]*)?)([_HL:*]*) 		 \1i\2_*\4 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)ō(([^ō_ ][^ _]*)?)([_HL:*]*) 		 \1o\2_*\4 
! ([^āēīōūáéíóúàèìòùâêîôû ]*)ū(([^ū_ ][^ _]*)?)([_HL:*]*) 		 \1u\2_*\4