Hi,

I'm working at the moment on percolation theory and, in order to get interesting images I use Maple to produce random spheres packing using the code below:

with(RandomTools):
with(plots):

x:=Generate(list(integer(range=0..20),100)): # random coordinate for x parameter
y:=Generate(list(integer(range=0..20),100)): # random coordinate for y parameter
z:=Generate(list(integer(range=0..20),100)): # random coordinate for z parameter
R:=Generate(list(float(range=1..3...

Hi everybody,

Does somebody has an idea about how to model the temperature of water during freezing ?

I mean, if you consider a certain mass of water and you put it, for example on a fridge. I don't consider the convection but only the diffusion, and I would like to model, if possible with an animation the temperature of the water (as a cube for the shape).

Normally, during the freezing I should observe a decrease of the temperature, then a freezing...

Hi,

I'm currently working on the modelling of a thermodynamic process.

Briefly, I cool down a solution (water + polymer) from -5°C to -15°C to induce a phase separation. At the end (and after removing of the water by lyophilisation) I obtain a porous sponge like material.

The process uses a home made cooling system which can be described like this:

- A Peltier module

- An aluminium layer recovered by teflon (And also a layer of ethanol)

Hi,

I'm playing at the moment with some calcuations on color space and even after a lot of trials on different softwares including photoshop and Igor Pro, I cannot obtain what I want... The advantage with Maple is that if I get this color space I will be then able to animate a point at the surface to describes the color evolution of a system... And that's what I try to do...

The idea is quiet simple but necessits the use of procedure and I'm not so good for that.

Hi,

I'm currently working on chemical process thermal exchange and particularly on the solving of the heat equation using a time dependant boundary condition.

Briefly, the process consists in two layers of different materials (M1 and M2, thickness L1 and L2). The bottom part of the material M1 (z=0) is cooled down from Ti to Tf with the function T(0,t)=Ti-R*t (R is the cooling rate in °C.min-1) until T(0,t)=Tf. Here the equilibrium is reached in t=(Tf-Ti...