function GNum = GeneNameToNum(GName)

Names = {'Kruppel'    'bicoid'    'caudal'    'even-skipped'    'fushi-tarazu'    'giant'    'hairy'    'hunchback'    'knirps'   'odd-skipped'    'paired'    'runt'    'sloppy-paired'    'tailless'};

for i=1:length(Names)
    if strcmp(GName,Names(i))
        GNum=i;
        return;
    end
end

GNum=0;
return;