example1_7.java

清华大学2002年出版的《科学与工程数值计算算法Java》配套源码

import java.applet.*;
import java.awt.*;
import java.awt.event.*;

class Complex
{ double real,image;
  public static void init(double a,double b,Complex c)
  {c.real=a;c.image=b;}
  public static double abs(Complex a)
  {double x,y,r;
   x=Math.abs(a.real);y=Math.abs(a.image);
   if(x>y)r=x*Math.sqrt(1+(y/x)*(y/x));
   else r=y*Math.sqrt(1+(x/y)*(x/y));
   return r;
  }

 public static void cheng(Complex a,Complex b,Complex c)
 { double p,q,s;
   c.real=a.real*b.real-a.image*b.image;
   c.image=a.real*b.image+a.image*b.real;
 }

 public static void Ln(Complex a)
 {double r,Pi=Math.PI,sita;
  r=Complex.abs(a);
  if(r!=0)
  {if(a.image==0)
    {if (a.real>=0)sita=0;
     else sita=Pi;}
  else if(a.real==0)
    {if(a.real>0)sita=Pi/2;
     else sita=-Pi/2;}
  else {if (a.real>0) sita=Math.atan(a.image/a.real);
        else sita=(Math.atan(a.image/a.real)+Pi);}
  a.real=Math.log(r);a.image=sita;}
 }

 public static void CPow(Complex a,Complex b)
 { Complex c=new Complex();
   Complex.Ln(a);
   Complex.cheng(a,b,c);
   a.real=Math.exp(c.real)*Math.cos(c.image);
   a.image=Math.exp(c.real)*Math.sin(c.image);
 }
}

public class Example1_7 extends Applet implements ActionListener
{TextField text1,text2,text3,text4;
 TextArea text5;
 Button button1;
 public void init()
 {text1=new TextField(5);text2=new TextField(5);
  text3=new TextField(5);text4=new TextField(5);
  text5=new TextArea(10,50);
  button1=new Button("计算复数幂");
  add(text1);add(text2);add(text3);add(text4);add(button1);add(text5);
  text5.setEditable(false);
  button1.addActionListener(this);
 }
 public void actionPerformed(ActionEvent e)
 {double n1,n2,n3,n4;
  Complex a,b;
  if(e.getSource()==button1)
  {n1=Double.valueOf(text1.getText()).doubleValue();
   n2=Double.valueOf(text2.getText()).doubleValue();
   n3=Double.valueOf(text3.getText()).doubleValue();
   n4=Double.valueOf(text4.getText()).doubleValue();
   a=new Complex();Complex.init(n1,n2,a);
   b=new Complex();Complex.init(n3,n4,b);
   text5.setText("");
   text5.append("复数A=("+a.real+")+("+a.image+")I\n");
   Complex.CPow(a,b);
   text5.append("它的(("+b.real+")+"+"("+b.image+"I))次方的主值为：\n");
   text5.append("("+a.real+")+("+a.image+")I\n");
  }
}
}