solve([F=H*H,K=30*F,150*H*125=K*H,H>0],[H,K,F])