/[escript]/trunk/doc/examples/diffusion.py
ViewVC logotype

Diff of /trunk/doc/examples/diffusion.py

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

trunk/esys2/doc/user/examples/diffusion.py revision 102 by jgs, Wed Dec 15 07:08:39 2004 UTC trunk/doc/user/examples/diffusion.py revision 569 by gross, Tue Feb 28 05:34:37 2006 UTC
# Line 1  Line 1 
1  # $Id$  # $Id$
 from mytools import *  
2  from esys.escript import *  from esys.escript import *
3  import esys.finley  from esys.escript.linearPDEs import LinearPDE
4    from esys.finley import Rectangle
5  #... set some parameters ...  #... set some parameters ...
6  x_c=[0.02,0.002]  xc=[0.02,0.002]
7  r=0.001  r=0.001
8  q0=50.e6  qc=50.e6
9  Tref=0.  Tref=0.
10  rhocp=2.6e6  rhocp=2.6e6
11  eta=75.  eta=75.
12  kappa=240.  kappa=240.
13  t_end=5.  tend=5.
14  # ...time step size and counter ...  # ... time, time step size and counter ...
15    t=0
16  h=0.1  h=0.1
17  i=0  i=0
 t=0  
18  #... generate domain ...  #... generate domain ...
19  mydomain = esys.finley.Rectangle(l0=0.05,l1=0.01,n0=250, n1=50)  mydomain = Rectangle(l0=0.05,l1=0.01,n0=250, n1=50)
20  #... open PDE ...  #... open PDE ...
21  mypde=Helmholtz(mydomain)  mypde=LinearPDE(mydomain)
22    mypde.setSymmetryOn()
23    mypde.setValue(A=kappa*kronecker(mydomain),D=rhocp/h,d=eta,y=eta*Tref)
24  # ... set heat source: ....  # ... set heat source: ....
25  x=mydomain.getX()  x=mydomain.getX()
26  q=q0*(length(x-x_c)-r).whereNegative()  q=qc*whereNegative(length(x-xc)-r)
27  # ... set initial temperature ....  # ... set initial temperature ....
28  T=Tref  T=Tref
29  # ... start iteration:  # ... start iteration:
30  while t<t_end:  while t<tend:
31        i+=1        i+=1
32        t+=h        t+=h
33        print "time step :",t        print "time step :",t
34        mypde.setValue(kappa=kappa,omega=rhocp/h,f=q+rhocp/h*T,eta=eta,g=eta*Tref)        mypde.setValue(Y=q+rhocp/h*T)
35        T=mypde.getSolution()        T=mypde.getSolution()
36        T.saveDX("T%d.dx"%i)        saveVTK("T.%d.xml"%i,temp=T)

Legend:
Removed from v.102  
changed lines
  Added in v.569

  ViewVC Help
Powered by ViewVC 1.1.26