Flute acoustics: measurement, modelling and design - School of ...

294 APPENDIX B. PROGRAM LISTINGS
fprintf(stderr, "PlayedImpedance error: ");
fprintf(stderr, "PlayedImpedance failed to parse input file.\n");
return -1;
}
/* retrieve data structures from XML file */
if(!parseXMLFile(xml_filename, &instrument)) {
fprintf(stderr, "PlayedImpedance error: ");
fprintf(stderr, "PlayedImpedance failed to parse XML file.\n");
return -1;
}
discretiseWoodwind(instrument, WW_MAX_LENGTH);
setAirProperties(instrument, WW_T_0, WW_T_AMB, WW_T_GRAD, WW_HUMID,
WW_X_CO2);
/* print the midi numbers as column labels */
for(i = 0; i < sizeVector(midiv); i++) {
/* set midi from vector */
midi = atoi((char*)elementAt(midiv, i));
printf("\t%.d", midi);
}
printf("\n");
/* for each frequency in spectrum range... */
for(f = flo; f