04.03.2013 Views

AIRY STRESS FUNCTION FOR TWO DIMENSIONAL INCLUSION ...

AIRY STRESS FUNCTION FOR TWO DIMENSIONAL INCLUSION ...

AIRY STRESS FUNCTION FOR TWO DIMENSIONAL INCLUSION ...

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

χ = Integrate[ϕ,z]<br />

χ1 = Integrate[ϕ1,z]<br />

zb0 + z2b1 2 + z3b2 3<br />

Gz 2<br />

4<br />

+Log@zDf1− f2<br />

z<br />

− f3<br />

2z 2<br />

z =ComplexExpand@r∗ Exp@I∗ θDD<br />

rCos@θD + rSin@θD<br />

e = ComplexExpand[Conjugate[z]]<br />

rCos@θD − rSin@θD<br />

h =FullSimplify@ComplexExpand@He∗γL+ χDD êêTrigReduce<br />

h1 = FullSimplify@ComplexExpand@χ1 + Hγ1 ∗eLDD êêTrigReduce<br />

1<br />

6 − θ r H6a0 +6 θ ra1 +6 2 θ r 2 a2 +6 2 θ b0 +3 3 θ rb1 +2 4 θ r 2 b2L<br />

1<br />

4Abs@rD 4<br />

H 4Im@θD r 2 H− 4Hθ−Re@θDL Conjugate@rD 2 HH−1+ 2θ Lr 2 S+4HIm@θD−Log@ Re@θD rDLf 1L−<br />

2 −2θ f 3+4 −2Re@θD Conjugate@rDH− θ f 2+rm 1L+4 −3θ rm 2LL<br />

φ = FullSimplify[ComplexExpand[Re[h]]]<br />

φ1= FullSimplify[ComplexExpand[Re[h1]]]<br />

1<br />

6 rH6ra1+6Cos@θDHa0+r 2 a2+b0L+3rCos@2θDb1+2r 2 Cos@3θDb2L<br />

r 4 SSin@θD 2 −Cos@2θDf3+rHrLog@r 2 Df1−2Cos@θDf2+2rCos@2θDm1+2Cos@3θDm2L<br />

2r 2<br />

41

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!