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

APPENDIX B. PROGRAM LISTINGS 291
if(!parseHole(doc, node, &h)) return 0;
curBore = createVector();
curCell = createUnitCell(h, curBore);
addElement(*cells, curCell);
}
node = node->next;
}
/* Ensure flange as expected */
if((*flange < 0.0) &&
(*flange != -1.0)) {
fprintf(stderr, "XML error: Flange is invalid.\n");
return 0;
}
return 1;
}
int parseBore(xmlDocPtr doc, xmlNodePtr node, BoreSegment* s) {
double radius1, radius2, length;
/* Search node's children for data elements */
node = node->children;
while(node != NULL) {
if(isXMLElement(node, RADIUS1))
radius1 = getAndScaleXMLDimensionData(doc, node);
if(isXMLElement(node, RADIUS2))
radius2 = getAndScaleXMLDimensionData(doc, node);
if(isXMLElement(node, LENGTH))
length = getAndScaleXMLDimensionData(doc, node);
node = node->next;
}
/* Ensure dimensions as expected */
if((radius1