FindRoot[1/(x+13328)^(5/7)+1/x^(5/7)=2/101325^(5/7),{x,1},WorkingPrecision->64]