A multiscale numerical algorithm for heat transfer simulation between multidimensional CFD and monodimensional system codes