comsol_get_element_type.m

function element_type = comsol_get_element_type(cmodel)
%function element_type = comsol_get_element_type(cmodel)
%
% function looking up, which finite elements are used set to be used in the
% comsol model
% 
%
% Oliver Zeeb, 19.09.2012
shape_Name = char(cmodel.shape.tags);
if size(shape_Name,1) > 1
    for k=1:size(shape_Name,1)
        feature_Name = char(cmodel.shape(shape_Name(k,:)).feature.tags);
        element_type{k}=char(cmodel.shape(shape_Name(k,:)).feature(feature_Name).shape);
    end
else
    feature_Name = char(cmodel.shape(shape_Name).feature.tags);
    element_type={char(cmodel.shape(shape_Name).feature(feature_Name).shape)};
end