Высокопроизводительные вычисления на кластерах. Беликов Д.А - 193 стр.

UptoLike

ВУЗ: 

ТГУ | Томск

Составители: 

Рубрика: 

193
End do
Do i=0,Nx+1
write (2,'(560f15.4)') (T(i,j),j=0,Ny+1)
End do
Write (2,'(a,2i15,a,f15.9)') ' Size=',idim,kdim,' TimeC= ',
1 TimeStop
Write (2,'(a,f15.9,a,f15.9)')' TimeF=', time, ' tau=',tau
Write (2,'(a,f15.9,a,f15.9)')'Tcomp=',TimeStop1,
1 ' Tcomm=',TimeStop2
Write(2,*) ‘n=’,Nx,’ T(Nx/2,Ny/2)=’, T(Nx/2,Ny/2)
Close(2)
End if
Call MPI_FINALIZE(ierr)
End
9.3 Задания
1. Апельсины в течение короткого времени могут выдерживать
отрицательные температуры. Предположим, что апельсин диамет-
ром 0,1 м (=0,47 Вт/(м·град), с=3800 Дж/(кг·град), =940 кг/м
3
)
имеет начальную температуру +5 °С. Температура воздуха внезапно
падает до –5 °С. Построить математическую модель для определе-
ния момента времени, когда температура поверхности апельсина
достигнет 0
о
С. Коэффициент теплоотдачи от апельсина к воздуху
равен 10 Вт/(м
2
·град). Разработать численный метод решения зада-
чи. Написать параллельную программу и провести ее тестирование
для различной размерности задачи и числа используемых процес-
сов.
2. Начальная температура хлорвинилового шарика
(=0,15 Вт/(м·град), α=8·10
-8
м
2
/с) диаметром 5 см равна 90 °С. Он
погружается в бак с водой, имеющей температуру 20 °С. Коэффици-
ент теплоотдачи от шарика в воде 20 Вт/(м
2
·град). Построить мате-
матическую модель процесса охлаждения шарика. Найти время
пребывания шарика в воде, по истечении которого температура в
его центре достигнет 40
о
С. Разработать численный метод решения
задачи. Написать параллельную программу и провести ее тестиро-
вание для различных размеров вычислительной сетки и числа ис-
пользуемых процессов.

Страницы