新しく発言する  EXIT  インデックスへ

2×2の実正方行列による複素数の計算


  2×2の実正方行列による複素数の計算 山中和義 2008/10/01 19:19:30 
  つづき 山中和義 2008/10/01 19:20:12 
Re: 2×2の実正方行列による複素数の計算  返事を書く  ノートメニュー
山中和義 <drdlxujciw> 2008/10/01 19:20:12
つづき



DIM A(2,2),AA(2,2)
CALL Comp(2,2, A) !z1=2+2i
CALL dispComp("z1'=",A)
MAT PRINT A;

DIM B(2,2),BB(2,2)
CALL Comp(1,-1, B) !z2=1-i
CALL dispComp("z2'=",B)
MAT PRINT B;


DIM C(2,2) !結果

CALL CompConj(A,C) !共役 z'
CALL dispComp("z1'=",C)

MAT C=A+B !加算 z1+z2
CALL dispComp("z1+z2=",C)

MAT C=A-B !減算 z1-z2
CALL dispComp("z1-z2=",C)

MAT C=(-3)*A !定数倍
CALL dispComp("(-3)*z1=",C)

MAT C=A*B !乗算 z1*z2
CALL dispComp("z1*z2=",C)

CALL CompDiv(A,B, C) !除算 z1/z2
CALL dispComp("z1/z2=",C)

CALL CompABS(A,C) !ノルム
CALL dispComp("|z1|=",C)


CALL CompDOT(A,B,C) !内積
CALL dispComp("(z1,z2)=",C)

CALL CompNRM(A,C) !正規化
CALL dispComp("z1/|z1|=",C)


END
   ├!4×4の実行列によるクォータニオン(四元... 山中和義 2008/10/01 19:21:51 
   │├つづき 山中和義 2008/10/01 19:23:37 
   │└つづき 山中和義 2008/10/01 19:24:24 
   └!2×2の複素行列によるクォータニオン(四... 山中和義 2008/10/01 19:27:00 
    └つづき 山中和義 2008/10/01 19:28:00 

 インデックスへ  EXIT
新規発言を反映させるにはブラウザの更新ボタンを押してください。