numerical iteration

[alex skaria]

I try to makea loop to iterate a function. The resulting value should reach a target value ( should not be lower than the target value. However this loop makes only one calc and result shows P0Start -1 as result.

Function InletP(P0Start, P2target, Flow2, Flow1, P1D, P2D)
P0 = P0Start
For i = 1 To 5000 Step 1
P0 = P0 - i
P2 = Sqr(P0 * P0 - Flow2 * Flow2 * (P1D * P1D - P2D * P2D) / (Flow1 * Flow1))
If (P2 < P2target) Then InletP = P0 Else P0 = P0 - 1
Exit For
Next i
End Function

[TMS]

Please add CODE tags to your code excerpt and I will offer an answer.

Regards