Resolution 
{
	{
		Name analysis; 
		System 
		{
			{ Name resol_getdpThermal; NameOfFormulation getdpThermal_formulation; } 
			{ Name resol_getdpEMGeneral3D; NameOfFormulation getdpEMGeneral3D_formulation; Type ComplexValue; Frequency Freq;} 
		} 
		Operation 
		{ 
			DeleteFile["../getdpresults/times.dat"]; 
			InitSolution[resol_getdpThermal] ; 
			InitSolution[resol_getdpEMGeneral3D] ; 
			IterativeLoopN [ 50, 0.400000 , System { { resol_getdpThermal, 0.001000, 1e-5, Residual MeanL1Norm  } } ]
				{ 
					UpdateConstraint[resol_getdpEMGeneral3D, Region[All], Assign ]; 
					Print ["Solving formulation [getdpEMGeneral3D]"]; 
					GenerateJac[resol_getdpEMGeneral3D];
					SolveJac[resol_getdpEMGeneral3D];
					Evaluate[$value4 = 0];
					Evaluate[$value2 = 0];

					UpdateConstraint[resol_getdpThermal, Region[All], Assign ]; 
					Print ["Solving formulation [getdpThermal]"]; 
					GenerateJac[resol_getdpThermal];
					SolveJac[resol_getdpThermal];

				} 
				SaveSolution[resol_getdpThermal]; 
				SaveSolution[resol_getdpEMGeneral3D]; 
				Print[{$Time}, File "../getdpresults/times.dat"]; 
				PostOperation[postOp_getdpThermal]; 
				PostOperation[postOp_getdpEMGeneral3D]; 

		} 
	} 
}