Resolution { { Name analysis; System { For i In{ 1:#Sur_UNIFPORT_N_N_List() } { Name resol_getdpMicrowaves~{i}; NameOfFormulation getdpMicrowaves_formulation~{i}; Type ComplexValue; Frequency Freq;} EndFor } Operation { DeleteFile["../getdpresults/times.dat"]; For i In {1:#Sur_UNIFPORT_N_N_List()} InitSolution[resol_getdpMicrowaves~{i}] ; SetTime[1.000000e+03]; DefineConstant[ f = 1.000000e+03]; UpdateConstraint[resol_getdpMicrowaves~{i}, Region[All], Assign ]; Print ["Solving formulation [getdpMicrowaves~{i}]"]; Generate[resol_getdpMicrowaves~{i}] ; Solve[resol_getdpMicrowaves~{i}]; SetTime[f]; SaveSolution[resol_getdpMicrowaves~{i}]; Print[{f}, File "../getdpresults/times.dat"]; PostOperation[postOp_getdpMicrowaves~{i}]; EndFor } } }