29 #define TOKENSIZE 80 //max size of tokens read from an input file
30 #define MAXSAMPLESIZE 65535 //max num of dimensions in feature space
49 if ((fscanf (File,
"%d", &SampleSize) != 1) ||
74 for (i = 0; i < N; i++) {
75 if (fscanf (File,
"%s", Token) != 1)
77 "Illegal circular/linear specification");
83 if (fscanf (File,
"%s", Token) != 1)
85 "Illegal essential/non-essential spec");
90 if (fscanf (File,
"%f%f", &(ParamDesc[i].Min), &(ParamDesc[i].Max)) !=
93 ParamDesc[i].
Range = ParamDesc[i].
Max - ParamDesc[i].
Min;
122 if ((Status = fscanf (File,
"%s", Token)) == 1) {
132 if ((fscanf (File,
"%d", &SampleCount) != 1) || (SampleCount < 0))
140 switch (Proto->
Style) {
161 for (i = 0; i < N; i++) {
175 for (i = 0; i < N; i++) {
176 if (fscanf (File,
"%s", Token) != 1)
178 "Illegal prototype distribution");
191 "Illegal prototype distribution");
202 for (i = 0; i < N; i++) {
226 else if (Status == EOF)
248 if (fscanf (File,
"%s", Token) != 1)
293 for (i = 0; i < N; i++) {
294 NumFloatsRead = fscanf (File,
"%f", &(Buffer[i]));
295 if (NumFloatsRead != 1) {
296 if ((NumFloatsRead == EOF) && (i == 0))
321 for (i = 0; i < N; i++) {
322 if (ParamDesc[i].Circular)
323 fprintf (File,
"circular ");
325 fprintf (File,
"linear ");
327 if (ParamDesc[i].NonEssential)
328 fprintf (File,
"non-essential ");
330 fprintf (File,
"essential ");
332 fprintf (File,
"%10.6f %10.6f\n", ParamDesc[i].Min, ParamDesc[i].Max);
352 fprintf (File,
"significant ");
354 fprintf (File,
"insignificant ");
358 fprintf (File,
"\t");
360 switch (Proto->
Style) {
368 for (i = 0; i < N; i++)
371 fprintf (File,
" %9s",
"normal");
374 fprintf (File,
" %9s",
"uniform");
377 fprintf (File,
" %9s",
"random");
382 fprintf (File,
"\n\t");
400 for (
int i = 0; i < N; i++)
401 fprintf(File,
" %9.6f", Array[i]);
418 switch (ProtoStyle) {
420 fprintf (File,
"spherical");
423 fprintf (File,
"elliptical");
426 fprintf (File,
"mixed");
429 fprintf (File,
"automatic");
440 BOOL8 WriteSigProtos,
441 BOOL8 WriteInsigProtos)
470 fprintf(File,
"%0d\n",N);