free_tree.m

利用电磁场的源激发方法来计算光子晶体波导例如光子晶体光纤

function free_tree(root)

if isempty(root.children)
    free(root)
    return
end

children = root.children;
free(root);
for iNode = 1:length(children)
    free_tree(children(iNode));
end