MathGroup Archive 2003

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: RE: To verify Cauchy-Riemann relations in complex variable graphically

  • To: mathgroup at smc.vnet.net
  • Subject: [mg39228] Re: RE: To verify Cauchy-Riemann relations in complex variable graphically
  • From: "Narasimham G.L." <google.news.invalid at web2news.net>
  • Date: Tue, 4 Feb 2003 02:23:30 -0500 (EST)
  • References: <b1l2k5$1@smc.vnet.net>
  • Reply-to: "Narasimham G.L." <manoos2p+8ammthma18 at hotmail.com>
  • Sender: owner-wri-mathgroup at wolfram.com

David Park:   Thanks, I get error msg by run
Show::gtype: CartesianMap is not a type of graphics.
Is it version realated? mine is V 2.2 -- Narasimham

> My friend Rip Pelletier pointed me to a better method to
> illustrate the
> Cauchy-Riemann relations for analytic functions. He
> pointed me to Tristan
> Needham's book 'Visual Complex Analysis'. In Chapter 5, Section I -
> Cauchy-Riemann Revealed, the CR conditions are related to the complex
> mapping.
>
> If a small patch of squares are mapped by an analytic
> function, then they go
> into another small patch in which all the squares have
> been amplified and
> rotated in exactly the same way.
>
> Fortunately, we have the ComplexMap package in Mathematica
> and can easily
> illustrate this for your functions. For example, for the
> Sin function...
>
> Needs['Graphics`ComplexMap`']
>
> With[
>     {x = 2,
>      y = 2,
>      del = 0.01,
>      f = Sin},
>     Show[GraphicsArray[{CartesianMap[
>             Identity, {x - del, x + del, del/5}, {y - del,
> y + del, del/5},
>             Axes -> False,
>             DisplayFunction -> Identity],
>
>           CartesianMap[
>             f, {x - del, x + del, del/5}, {y - del, y + del, del/5},
>             Axes -> False,
>             DisplayFunction -> Identity]}],
>       ImageSize -> 500]];
>
> A square patch maps into a rotated square patch. Just
> change f and/or the
> mapping points for other cases. Use a pure function for z^2.
>
> For a case that is not analytic, and so the CR relations
> do not hold, use
> f = # + 2Abs[#] &. The squares go to parallelograms.
>
> David Park
> djmp at earthlink.net
> http://home.earthlink.net/~djmp/
>
> From: Narasimham G.L. [mailto:google.news.invalid at web2news.net]
To: mathgroup at smc.vnet.net
>
> Is it possible to have a semi transparent view of surfaces
> so that one
> may verify slopes by ParametricPlot3D for Cauchy-Riemann relations?
> The following is program for 3 functions Z^2, Z^3, Sin[Z].It was
> expected to check slopes at the line of intersection of Re
> and Im parts.
>
> R1=x^2-y^2 ; I1= 2 x y ;
> z2r=Plot3D[R1 , {x,-Pi,Pi},{y,-Pi,Pi} ];
> z2i=Plot3D[I1 , {x,-Pi,Pi},{y,-Pi,Pi} ];
> Show[z2r,z2i] ; 'Top view >> Re,Im Intxn';
> Plot[{x ArcTan[-Sqrt[2]+1],x ArcTan[Sqrt[2]+1]}, {x,-Pi,Pi} ];
>
> R3=x^3 - 3 x y^2 ; I3= 3 x^2 y - y ^3 ;
> z3r=Plot3D[R3 , {x,-Pi,Pi},{y,-Pi,Pi} ];
> z3i=Plot3D[I3 , {x,-Pi,Pi},{y,-Pi,Pi} ];
> Show[z3r,z3i] ; 'Top view >> Re,Im Intxn';
> Plot[{x,x (-Sqrt[3]+2) , x (-Sqrt[3]-2) }, {x,-Pi,Pi} ];
>
> R2=Cosh[y] Sin[x] ; I2=Sinh[y] Cos[x] ;
> scr=Plot3D[R2,{x,-Pi/2,Pi/2},{y,-Pi/2,Pi/2}];
> sci=Plot3D[I2,{x,-Pi/2,Pi/2},{y,-Pi/2,Pi/2}];
> Show[scr,sci]; 'Top view >>  Re,Im Intxn';
> Plot[{ArcTanh[Tan[x]]},{x,-Pi/2,Pi/2 }];
-- 
Posted via http://web2news.com
To contact in private, remove 



  • Prev by Date: Defining and Programming Graphical Directives
  • Next by Date: Posting for MathGroup
  • Previous by thread: Re: To verify Cauchy-Riemann relations in complex variable graphically
  • Next by thread: RE: Another plea for help...