Ciao a tutti, sto cercando di risolvere questo sistema di equazioni differenziali, ma la soluzione che trovo non è per niente fisica, quindi molto probabilmente sto sbagliando a scrivere il codice. Questo è il sistema in questione:
$ { ( (dTf)/(dx)=h*(Ts-Tf)/(rhouCp) ),( (dq)/(dx)=-beta*qr ),( (d^2Ts)/(dx^2)=1/(ks)*((-beta_*qr)-h*(Ts-Tf)) ):} $
Le variabili dell'equazione sono Tf, Ts e qr. Le altre sono tutte costanti
Il codice che ho scritto è il seguente, per quanto riguarda il main (tralascio ovviamente la definizione di tutte le costanti):
save odeprova45
y0 = [Tf1,50000,q_sun,0];
tspan = 0:0.01:L;
[t,y] = ode45('fun',tspan,y0);
Per quanto riguarda invece la function:
function yp=fun(t,y)
load odeprova45
Tf=y(1);
Ts=y(2);
qr=y(3);
dTs=y(4);
yp=[h*(Ts-Tf)/(rho_u*cp);
dTs;
-beta_*qr
1/ks*(-beta_*qr)-h*(Ts-Tf) %d2Ts/dx2=d2Ts
];
è il comando giusto? Anche usando ode15i mi vengono risultati un po' strani (anche se ode15i ha una sintassi completamente diversa).
Spero in un vostro aiuto, perchè con Matlab faccio davvero fatica