solve-problem(A):
		while size(A) > Critical-Size do begin
			Split and select subproblem i;
			A := A$_{i}$
			end;
		End-Action