Integrate[m^(-0.66-0.001 m^(1/3)(700 +Log[m])),{m,0,Infinity}]