Numerical Analysis of Heat and Mass Transfer in Porous Media