function exportFig45Fem4()
%EXPORTFIG45FEM4  导出 Et 与 Figure4/5 端口面 normE 图（plotE2 方式）

rootDir = fileparts(mfilename('fullpath'));
outDir = fullfile(rootDir, 'OutFile_fem4');
load(fullfile(rootDir, 'MeshData2x.mat'), 'Mesh');
[Physic, Material, Port1Solver, Port2Solver] = configPhysicMaterialFem4();

Port1Mesh = GetBMesh(Mesh.Nodes, Mesh.Faces, Mesh.FacesIndex, Physic.Port1);
[Port1Solver, Port1Mesh] = BoundaryEigenMode(Port1Mesh, Physic, Material, Port1Solver);
Port1Solver = GetPowerCoef(Port1Solver, Port1Mesh, Material.murF, 1);
Port1Mesh.normal = [0; 0; -1];
Port2Mesh = GetBMesh(Mesh.Nodes, Mesh.Faces, Mesh.FacesIndex, Physic.Port2);
[Port2Solver, Port2Mesh] = BoundaryEigenMode(Port2Mesh, Physic, Material, Port2Solver);
Port2Mesh.normal = [0; 0; 1];

[Solver, Mesh] = FemMatrixAssembly(Physic, Material, Mesh, ...
    Port1Mesh, Port1Solver, Port2Mesh, Port2Solver);

[~, ~, ~, normE_elem] = GetExEyEz2(1, Mesh.Nodes, Mesh.Elements, ...
    Mesh.EdgesOfElements, Solver.Et);

fid = fopen(fullfile(outDir, 'X_real.txt'), 'w');
fprintf(fid, '%.16g\n', real(Solver.Et));
fclose(fid);
fid = fopen(fullfile(outDir, 'X_imag.txt'), 'w');
fprintf(fid, '%.16g\n', imag(Solver.Et));
fclose(fid);

In = plotE2(Mesh.Nodes, Port1Mesh.OldFaces, Mesh.AllFaces, ...
    Mesh.FacesOfElements, normE_elem, 4, 0.5);
Out = plotE2(Mesh.Nodes, Port2Mesh.OldFaces, Mesh.AllFaces, ...
    Mesh.FacesOfElements, normE_elem, 5, 0.5);
saveas(figure(4), fullfile(outDir, 'fig4_port_in_matlab.png'));
saveas(figure(5), fullfile(outDir, 'fig5_port_out_matlab.png'));
fprintf('MATLAB port max |E| in=%g out=%g\n', In, Out);
fprintf('Saved fig4/5 to %s\n', outDir);

end