Hello to everyone I have a problem with calculation of the Nusselt number and the thermal inelet region. My result is 1.51 but my prof told me is not correct.Here is my code
Please keep your questions and replies in English Language.Thank you.
Your code for esercizio 5 fails because your Nu[t] is a list, not a number. Try this:
Nu[t]
t = 0.01; While[t <= 1.5, If[Nu[t][[1]] <= 1.05*3.657, Break[]]; t = t + 0.01] t
or, even better,
Clear[t]; FindRoot[Nu[t][[1]] == 1.05*3.657, {t, .1, .15}]
[ENGLISH] Checking the values It seems to works.
[ITA] Verificando i valori che ottengo funziona.
Did you type Nu[t][[1]] or Nu[t][1]?
Nu[t][[1]]
Nu[t][1]