/[escript]/trunk/escript/py_src/faultsystems.py
ViewVC logotype

Diff of /trunk/escript/py_src/faultsystems.py

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

revision 2682 by gross, Mon Sep 21 08:06:37 2009 UTC revision 2683 by gross, Tue Sep 29 02:20:22 2009 UTC
# Line 655  class FaultSystem: Line 655  class FaultSystem:
655              m_ul=wherePositive(s_upper[0]-s_upper[1])              m_ul=wherePositive(s_upper[0]-s_upper[1])
656              s=s_upper*m_ul+s_lower*(1-m_ul)              s=s_upper*m_ul+s_lower*(1-m_ul)
657              s=maximum(minimum(s,1.),0)              s=maximum(minimum(s,1.),0)
658              p=h-s[0]*(R*m_ul+(1-m_ul)*r)-s[1]*(D1*m_ul+(1-m_ul)*D0)              p=h-(m_ul*R+(1-m_ul)*r)*s[0]-(m_ul*D1+(1-m_ul)*D0)*s[1]
659              dist=length(p)              dist=length(p)
660              lside=sign(inner(p,ns[i]))              lside=sign(inner(p,ns[i]))
661              if d == None:              if d == None:
Legend:
Removed from v.2682  
changed lines
  Added in v.2683
  ViewVC Help
Powered by ViewVC 1.1.26