loadNet ("win17-20relu-10relu-5relu-1sig-500ep.net")
loadPattern ("tra.pat")
resfile := "test.res"
saveResult (resfile, 1, PAT, FALSE, TRUE, "create")
command := "/home/reczko/doc/foukas/dat/foukas/snns/SNNSv4.3/tools/sources/analyze -s -e WTA -i " + resfile + " | awk -f /home/reczko/doc/foukas/dat/foukas/snns/SNNSv4.3/tools/sources/analyze.gawk"
execute(command, w, r, u, e)
print("wrong: ",w, " right: ",r, " unknown: ",u, " error: ",e)
