Please provide Matlab solution with Function at seperate m.file

Problem01. A pipe of length L 25 m, and diameter d 10 cm that carries steam, loses heat to the ambient air and surrounding surfaces by convection and radiation. If the total flow of the heat per unit time, Q, emanating from the surface of the pie is measured, then the surface temperature of the pipe, Ts, is determined by the following equation: where 0.8 is the radiative emissivity of the surface of the pipe, and -5.67 x 108 w/m2/K' is the Stefan-Boltzmann constant. If Q = 18405 w, h = 10 w/m2/K, and Tar-Tsur,-298 K. Find t with Matlab's built-in function fzero. he surface temperature of the pipe, Ts, using any numerical method. Compare your results