In[29]:= Solve[ Eliminate[z1 i1 == z2 i2 == zp i && i == i1 + i2, {i1, i2}], zp] Out[29]= {{zp -> (z1 z2)/(z1 + z2)}}
Exactly what I was looking for, thank you very much.
