$GER-ASSIGN: Displays the German alphabet for phoneme assignment
$GERMAN : Change to German input

// untested code snipped - not complete
include <ctype.h> //some macros for isdigit() and isalpha() etc.
include <stddef.h>
#define TRUE 1
#define FALSE 0

// check if an array element is a pronounceable digit
integer is_pronounceable_digit (char a[], size_t index){
if (isdigit((int) a[index])) { // stands for (a[index] >= 48 && a[index] <= 57)
if (index){ // true if not the first character
if (isalpha((int) a[index-1]))
return(FALSE); // pitch, eg "A1" (a[index-1]+a[index])
}else{
return(TRUE);
}
}else{
return(TRUE); // the digit (a[index]) is the first character
}
}
return(FALSE);
}