This is a Fortran code simulating the heat and mass transfer in porous media by solving the non-Darcy flow by applying the streamfunction-vorticity method to calculate the velocity field without any need to calculate the pressure field and using the local thermal non-equilibuiriam model (LTNE) in order to calculate the temperature field for both solid and fluid phase.