resizing the plot without a mouse has been asked many times but I do not think an official software change request has been submitted for it. 

5 plots in one line can be done using Array.  Something like this

with(plots):
a:=sin(x):
b:=cos(x):
c:=x^2:
d:=x-5:
e:=x^3+x:
display(Array([a,b,c,d,e])

This link should help

http://www.mapleprimes.com/questions/125062-Play-Audio-File-From-Maple

Unfortunately I cannot replicate the converging iteration in the original problem. 

Using your method I keep getting this error instead

Error, (in pdsolve/numeric/process_PDEs) PDEs can only contain dependent variables with direct dependence on the independent variables of the problem, got {T(.22, t), T4(.22, t)}

Does someone know how to circumvent the problem?

No one seems to have a solution for this.  It seemed to be fixed in M15. 

Can anyone offer a fix for prior versions?

1 year later ... It seems that M16 is okay with this problem and works with the radiative boundary conditions. 

I am trying to get it to work in M12.  Is this an impossible task?  Up to what version does it not work? 

As the original poster pointed out, it is the extra radiative term that is causing problems to the solution.  Is it because of the 4th order term in the differential equation? 

Now I suppose if it is some programming issue in Maple for pdsolve then am I  S. O .L .?  But if not maybe a work around exists.  Where is the error in pdsolve programming?  and How do I implement a fix?

I tried everything, slightly changing the equation a little.  - to -1, adding extra brackets etc.  but none seemed to work.  The term  lambda*epsilon*(T(L,t)^4-T0^4) seems to be ignored by pdsolve in the differential equation.

Anyone able to answer any of the questions I ask and add some feedback?

Looks like you need more boundary conditions.  You have defined t=0 but not x=0  ie a(0,t) and b(0,t)

It seems like there are a few more issues in your code. 

Do you even get a plot output?  I seem to get values up to C[16] then results are no longer numeric. 

Also your pointplot([C,E])  doesn't appear to be in the correct format perhaps you mean pointplot([seq([C[i],E[i]],i=1..?)])  or maybe your format is workable in newer maple versions?

Also it looks like you are using one variable as a counter.  You could also use listplot as an alternative, unless your intent is to have a counter variable in the plot.

Well it could be. member works fine

Test:=Array(1..3,[1,2,3]):
member(3,Test.'l');
                                   True

I think because the value is saved it also evuates as a boolean value and so when you try to evaluate it against an integer maple gets confused. 

Although this is unconventional, you could use the depracated "array" command instead of "Array" 

FYI - in Maple 16 it works with Array.

After a short time of investigation is there any progress?  Can maplesim handle the model?

One could have a creative way of dealing with duplicate numbers in the same wheel.  Bu you could add some code to take care of that if you really didn't want them there.  Something like this code snippet is one way to create a list of numbers that are different.

a := table():
for i to 8 do
  b := convert(a, list);
  a[i] := (rand(3 .. 15))():
  while is(member(a[i], b)) = true do a[i] := (rand(3 .. 15))(): end do:
end do:
convert(a, list)
                        [3, 5, 7, 12, 13, 4, 10, 6]

Or even much simpler using the combinat[randcomb] package

with(combinat,randcomb):
randcomb([seq(3..15)],8)
                        [4, 5, 6, 8, 9, 10, 11, 15]

Looks like ascii art, I get that when I set

interface(plotdevice=char)

To return to normal I just reset the plotdevice back to inline (should be the default)

interface(plotdevice=inline)

Maple 16 could have picked up a previous install Maple setting.  Hope that helps.

In the spirit of the post and for anyone else with young kids.  (I tried to branch this topic but didn't work for some reason so I continue here).  My daughter came home with something that looks like a math wheel.  It is easy to see how they work.  Each math wheel has an associated operation to be carried out where the student enters the answer in the outer sections.  I have not explicity included what the operations are, but here is the code I came up with to create the mathwheel in maple.

Download Mathwheel.mw

Here is one way to go about it

with(ExcelTools):
a := Import("c:/yourdata.xls", "Sheet1", "A1:A20000"): 
b := Import("c:/yourdata.xls", "Sheet1", "B1:B20000"):

plot([seq([a[i, 1], b[i, 1]], i = 1 .. 20000)]);

No, but my best guess is sometime in April. 

Are you planning to get Maple 16?  I have no idea what's in store for Maple 16.  What would really be awesome if they bundled Maple and MapleSim together.  Now that would be one major upgrade.