/[escript]/trunk/dudley/test/python/subduction1.py
ViewVC logotype

Diff of /trunk/dudley/test/python/subduction1.py

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

revision 3773 by caltinay, Fri Nov 12 01:19:02 2010 UTC revision 3774 by jfenwick, Wed Jan 18 06:29:34 2012 UTC
# Line 70  else: Line 70  else:
70      dd=[-cos(ALPHA),0.,-sin(ALPHA)]      dd=[-cos(ALPHA),0.,-sin(ALPHA)]
71  r=sqrt(length(x-X0)**2-inner(X0-x,S)**2)  r=sqrt(length(x-X0)**2-inner(X0-x,S)**2)
72  v=V_MAX*r*dd  v=V_MAX*r*dd
73  mask=MaskFromBoundaryTag(dom,"subduction")*[ 1. for i in xrange(DIM) ]  mask=MaskFromBoundaryTag(dom,"subduction")*[ 1. for i in range(DIM) ]
74  #  #
75  #  back of the domain  #  back of the domain
76  #  #

Legend:
Removed from v.3773  
changed lines
  Added in v.3774

  ViewVC Help
Powered by ViewVC 1.1.26