PostOperation{ 
For i In {1:#Sur_UNIFPORT_N_N_List()}
  {Name postOp_getdpMicrowaves~{i}; NameOfPostProcessing postProc_getdpMicrowaves~{i}; 
    Operation{ 
    For j In {1:#Sur_UNIFPORT_N_N_List()}
    Print[AaLoadVoltage~{j}, OnRegion Sur_UNIFPORT_N~{i}, File StrCat[ "..\getdpresults\globals\AaLoadVoltage~{j}", Sprintf("_%g", j), Sprintf("_Sur_UNIFPORT_N_%g", j), Sprintf("_port%g", i), "_globals.dat"], AppendToExistingFile 1, Format Table, TimeStep 0, StoreInVariable $AaLoadVoltage~{j} ]; 
    EndFor
    Print[AbGamma~{i}, OnRegion Face_4, File StrCat[ "..\getdpresults\globals\AbGamma~{i}_Face_4", Sprintf("_port%g",i),"_globals.dat"], Format Table, TimeStep 0, StoreInVariable $AbGamma~{i} ]; 
    For j In {1:#Sur_UNIFPORT_N_N_List()}
    Print[AcLoadCurrent~{j}, OnRegion Sur_UNIFPORT_N~{i}, File StrCat[ "..\getdpresults\globals\AcLoadCurrent~{j}", Sprintf("_%g", j), Sprintf("_Sur_UNIFPORT_N_%g", j), Sprintf("_port%g", i), "_globals.dat"], AppendToExistingFile 1, Format Table, TimeStep 0, StoreInVariable $AcLoadCurrent~{j} ]; 
    EndFor
    For j In {1:#Sur_UNIFPORT_N_N_List()}
    Print[AdLoadImpedance~{j}, OnRegion Sur_UNIFPORT_N~{i}, File StrCat[ "..\getdpresults\globals\AdLoadImpedance~{j}", Sprintf("_%g", j), Sprintf("_Sur_UNIFPORT_N_%g", j), Sprintf("_port%g", i), "_globals.dat"], AppendToExistingFile 1, Format Table, TimeStep 0, StoreInVariable $AdLoadImpedance~{j} ]; 
    EndFor
    For j In {1:#Sur_UNIFPORT_N_N_List()}
    Print[AeLoadPower~{j}, OnRegion Sur_UNIFPORT_N~{i}, File StrCat[ "..\getdpresults\globals\AeLoadPower~{j}", Sprintf("_%g", j), Sprintf("_Sur_UNIFPORT_N_%g", j), Sprintf("_port%g", i), "_globals.dat"], AppendToExistingFile 1, Format Table, TimeStep 0, StoreInVariable $AeLoadPower~{j} ]; 
    EndFor
    For j In {1:#Sur_UNIFPORT_N_N_List()}
    Print[AfScale~{j}, OnRegion Sur_UNIFPORT_N~{i}, File StrCat[ "..\getdpresults\globals\AfScale~{j}", Sprintf("_%g", j), Sprintf("_Sur_UNIFPORT_N_%g", j), Sprintf("_port%g", i), "_globals.dat"], AppendToExistingFile 1, Format Table, TimeStep 0, StoreInVariable $AfScale~{j} ]; 
    EndFor
    Print[Efield,  OnElementsOf Region[{ Solid_1}], File "..\getdpresults\Efield_Solid_1_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[Efield,  OnElementsOf Region[{ air}], File "..\getdpresults\Efield_air_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[Efield_im,  OnElementsOf Region[{ Solid_1}], File "..\getdpresults\Efield_im_Solid_1_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[Efield_im,  OnElementsOf Region[{ air}], File "..\getdpresults\Efield_im_air_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[Efield_re,  OnElementsOf Region[{ Solid_1}], File "..\getdpresults\Efield_re_Solid_1_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[Efield_re,  OnElementsOf Region[{ air}], File "..\getdpresults\Efield_re_air_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[Hfield,  OnElementsOf Region[{ Solid_1}], File "..\getdpresults\Hfield_Solid_1_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[Hfield,  OnElementsOf Region[{ air}], File "..\getdpresults\Hfield_air_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[Hfield_im,  OnElementsOf Region[{ Solid_1}], File "..\getdpresults\Hfield_im_Solid_1_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[Hfield_im,  OnElementsOf Region[{ air}], File "..\getdpresults\Hfield_im_air_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[Hfield_re,  OnElementsOf Region[{ Solid_1}], File "..\getdpresults\Hfield_re_Solid_1_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[Hfield_re,  OnElementsOf Region[{ air}], File "..\getdpresults\Hfield_re_air_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SEfield_im,  OnElementsOf Region[{ Face_1}], File "..\getdpresults\SEfield_im_Face_1_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SEfield_im,  OnElementsOf Region[{ Face_2}], File "..\getdpresults\SEfield_im_Face_2_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SEfield_im,  OnElementsOf Region[{ Face_3}], File "..\getdpresults\SEfield_im_Face_3_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SEfield_im,  OnElementsOf Region[{ Face_4}], File "..\getdpresults\SEfield_im_Face_4_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SEfield_im,  OnElementsOf Region[{ Face_5}], File "..\getdpresults\SEfield_im_Face_5_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SEfield_im,  OnElementsOf Region[{ Face_6}], File "..\getdpresults\SEfield_im_Face_6_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SEfield_im,  OnElementsOf Region[{ Face_8}], File "..\getdpresults\SEfield_im_Face_8_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SEfield_re,  OnElementsOf Region[{ Face_1}], File "..\getdpresults\SEfield_re_Face_1_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SEfield_re,  OnElementsOf Region[{ Face_2}], File "..\getdpresults\SEfield_re_Face_2_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SEfield_re,  OnElementsOf Region[{ Face_3}], File "..\getdpresults\SEfield_re_Face_3_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SEfield_re,  OnElementsOf Region[{ Face_4}], File "..\getdpresults\SEfield_re_Face_4_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SEfield_re,  OnElementsOf Region[{ Face_5}], File "..\getdpresults\SEfield_re_Face_5_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SEfield_re,  OnElementsOf Region[{ Face_6}], File "..\getdpresults\SEfield_re_Face_6_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SEfield_re,  OnElementsOf Region[{ Face_8}], File "..\getdpresults\SEfield_re_Face_8_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SHfield_im,  OnElementsOf Region[{ Face_1}], File "..\getdpresults\SHfield_im_Face_1_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SHfield_im,  OnElementsOf Region[{ Face_2}], File "..\getdpresults\SHfield_im_Face_2_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SHfield_im,  OnElementsOf Region[{ Face_3}], File "..\getdpresults\SHfield_im_Face_3_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SHfield_im,  OnElementsOf Region[{ Face_4}], File "..\getdpresults\SHfield_im_Face_4_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SHfield_im,  OnElementsOf Region[{ Face_5}], File "..\getdpresults\SHfield_im_Face_5_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SHfield_im,  OnElementsOf Region[{ Face_6}], File "..\getdpresults\SHfield_im_Face_6_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SHfield_im,  OnElementsOf Region[{ Face_8}], File "..\getdpresults\SHfield_im_Face_8_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SHfield_re,  OnElementsOf Region[{ Face_1}], File "..\getdpresults\SHfield_re_Face_1_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SHfield_re,  OnElementsOf Region[{ Face_2}], File "..\getdpresults\SHfield_re_Face_2_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SHfield_re,  OnElementsOf Region[{ Face_3}], File "..\getdpresults\SHfield_re_Face_3_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SHfield_re,  OnElementsOf Region[{ Face_4}], File "..\getdpresults\SHfield_re_Face_4_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SHfield_re,  OnElementsOf Region[{ Face_5}], File "..\getdpresults\SHfield_re_Face_5_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SHfield_re,  OnElementsOf Region[{ Face_6}], File "..\getdpresults\SHfield_re_Face_6_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SHfield_re,  OnElementsOf Region[{ Face_8}], File "..\getdpresults\SHfield_re_Face_8_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SurEfield,  OnElementsOf Region[{ Face_1}], File "..\getdpresults\SurEfield_Face_1_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SurEfield,  OnElementsOf Region[{ Face_2}], File "..\getdpresults\SurEfield_Face_2_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SurEfield,  OnElementsOf Region[{ Face_3}], File "..\getdpresults\SurEfield_Face_3_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SurEfield,  OnElementsOf Region[{ Face_4}], File "..\getdpresults\SurEfield_Face_4_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SurEfield,  OnElementsOf Region[{ Face_5}], File "..\getdpresults\SurEfield_Face_5_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SurEfield,  OnElementsOf Region[{ Face_6}], File "..\getdpresults\SurEfield_Face_6_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SurEfield,  OnElementsOf Region[{ Face_8}], File "..\getdpresults\SurEfield_Face_8_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SurHfield,  OnElementsOf Region[{ Face_1}], File "..\getdpresults\SurHfield_Face_1_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SurHfield,  OnElementsOf Region[{ Face_2}], File "..\getdpresults\SurHfield_Face_2_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SurHfield,  OnElementsOf Region[{ Face_3}], File "..\getdpresults\SurHfield_Face_3_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SurHfield,  OnElementsOf Region[{ Face_4}], File "..\getdpresults\SurHfield_Face_4_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SurHfield,  OnElementsOf Region[{ Face_5}], File "..\getdpresults\SurHfield_Face_5_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SurHfield,  OnElementsOf Region[{ Face_6}], File "..\getdpresults\SurHfield_Face_6_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[SurHfield,  OnElementsOf Region[{ Face_8}], File "..\getdpresults\SurHfield_Face_8_0.dat", TimeStep 0, Smoothing 1, Format NodeTable]; 
    Print[VSWR, OnRegion Face_4, File StrCat[ "..\getdpresults\globals\VSWR_Face_4", Sprintf("_port%g",i),"_globals.dat"], Format Table, TimeStep 0 ]; 
    Print[acS11, OnRegion Face_4, File StrCat[ "..\getdpresults\globals\acS11_Face_4", Sprintf("_port%g",i),"_globals.dat"], Format Table, TimeStep 0 ]; 
      For k In {1:#Sur_UNIFPORT_N_N_List()}
    For j In {1:#Sur_UNIFPORT_N_N_List()}
    Print[acS~{j}~{k}, OnRegion Sur_UNIFPORT_N~{j}, File StrCat[ "..\getdpresults\globals\acS~{j}~{k}", Sprintf("_port%g", i), "_globals.dat"], AppendToExistingFile 1, Format Table, TimeStep 0 ]; 
      EndFor
    EndFor
    Print[acceptedPower, OnRegion Face_4, File StrCat[ "..\getdpresults\globals\acceptedPower_Face_4", Sprintf("_port%g",i),"_globals.dat"], Format Table, TimeStep 0 ]; 
    Print[bDielectricLosses[Solid_1], OnGlobal, File "..\getdpresults\globals\bDielectricLosses_Solid_1_globals.dat", Format Table, TimeStep 0 ]; 
    Print[gamma, OnRegion Face_4, File StrCat[ "..\getdpresults\globals\gamma_Face_4", Sprintf("_port%g",i),"_globals.dat"], Format Table, TimeStep 0 ]; 
    Print[portImpedance, OnRegion Face_4, File StrCat[ "..\getdpresults\globals\portImpedance_Face_4", Sprintf("_port%g",i),"_globals.dat"], Format Table, TimeStep 0 ]; 
    Print[portReactance, OnRegion Face_4, File StrCat[ "..\getdpresults\globals\portReactance_Face_4", Sprintf("_port%g",i),"_globals.dat"], Format Table, TimeStep 0 ]; 
    Print[portResistance, OnRegion Face_4, File StrCat[ "..\getdpresults\globals\portResistance_Face_4", Sprintf("_port%g",i),"_globals.dat"], Format Table, TimeStep 0 ]; 
    } 
  } 
 EndFor
}