## 25 Reputation

0 years, 197 days

## How do I change variables...

Maple

I want to change my variables. The coding below shows the influence of the Nb and Nt on the local Nusselt number (-theta') against the convection Bi.

But now I want it to be  the influence of the Bi on the local Nusselt number (-theta') against the Nb and Nt.

Can anyone help me?

 >
 >
 >
 (1)
 >
 (2)
 >
 (3)
 >
 (4)
 >
 (5)
 >
 (6)
 >
 > getRes:= proc(a, x);                 local sol;                 if   type(x, numeric)                 then sol:= dsolve                            ( eval                              ( {BC1, BC2, BC3, DE1, DE2, DE3},                                [Nt = a, Nb = a, Pr = 2, Le = 5, Bi = x]                              ),                              numeric,                              output = listprocedure,                              abserr = 0.0001,                              maxmesh = 1024,                              initmesh = 512                            );                 else return 'procname(a,x)';                 fi;                 return -eval(diff(theta(eta), eta), sol)(0)            end proc:   cl:=[red, green, blue, yellow, black]:   L:=[0.2, 0.4, 0.6,0.8,1.0]:   display   ( [ seq       ( plot         ( getRes( L[k], x),           x=0..5,color = colorList[k], legend = ["Nb=Nt" = L[k]], legendstyle = [location = top],           color=cl[k]         ),         k=1..5       )     ]   )
 >
 >

## How to plot -diff(theta(eta), eta) VS Bi...

Maple

This is the graph I want but Nb must be equal to Nt. I should get values -diff(theta(eta), eta) for Bi or Nt Nb first?

BiNbNtxx.mw

Maple

 >
 >
 >

 >
 (1)
 >
 (2)
 >
 >
 (3)
 >
 (4)
 >
 (5)
 >
 (6)
 >
 (7)
 >
 >
 >
 >