(* SCHEMA structural_response_representation_schema; *)
FUNCTION required_1d_nodes
(node_list : LIST [1:?] OF node_representation;
order : element_order) : BOOLEAN;
LOCAL
end_nodes : INTEGER;
additional_nodes : INTEGER;
END_LOCAL;
end_nodes := 2;
IF (order = linear) THEN
additional_nodes := 0;
END_IF;
IF (order = quadratic) THEN
additional_nodes := 1;
END_IF;
IF (order = cubic) THEN
additional_nodes := 2;
END_IF;
RETURN (SIZEOF (node_list) = end_nodes + additional_nodes);
END_FUNCTION;
Generated by STEP Tools® EXPRESS to HTML Converter
2012-03-27T17:13:59-04:00