define V [ a | e | i | o | u | a ];
define C [ b | c | d | f | g | h | j | k | l |
           m | n | p | q | r | s | t | v |
           x | y | z ];

define SlovakShortening %: -> 0 || V %: C* V _ ;

define GidabalShortening %: -> 0 // V %: C* V _ ;

echo
echo Testing Slovak
push SlovakShortening

echo Input: vola:va:me:
down vola:va:me:

echo
echo Testin Gidabal
push GidabalShortening

echo Input: gunu:mba:da:ngbe:
down gunu:mba:da:ngbe: