差分

この文書の現在のバージョンと選択したバージョンの差分を表示します。

構造因子 2014/03/12 15:39 構造因子 2014/03/12 15:42 現在
ライン 14: ライン 14:
例)正方格子(1x1)の構造因子 例)正方格子(1x1)の構造因子
-|{{http://sstweb.ee.ous.ac.jp/seminor/Lesson_Fortran/L08/Fig/L8-struct.2.jpeg|}}|N: 格子の大きさ//a:格子定数|+|{{http://sstweb.ee.ous.ac.jp/seminor/Lesson_Fortran/L08/Fig/L8-struct.2.jpeg|}}|N: 格子の大きさ \\ a:格子定数|
-原子の存在する格子点に番号をつける+  - 原子の存在する格子点に番号をつける 
 +  - ''Rx(I)'', ''Ry(I)'' に値を入れる。 
 +  - ''Kx'', ''Ky'' を決める。 
 +  - ''Wre'' に初期値 0 を代入する 
 +  - ''Wim'' に初期値 0 を代入する 
 +  - ''L = 0'' から ''N*N - 1'' まで繰り返し処理 
 +    - ''Wre = Wre + Cos(Kx*Rx(L) + Ky*Ry(L))'' 
 +    - ''Wim = Wim + Sin(Kx*Rx(L) + Ky*Ry(L))'' 
 +  - ''F = Wre*Wre + Wim*Wim''
-Rx(I), Ry(I) に値を入れる。 
- 
-Kx, Ky を決める。 
- 
-Wre に初期値 0 を代入する 
- 
-Wim に初期値 0 を代入する 
- 
-L= 0 から N*N-1まで繰り返し処理 
- 
-{ 
- 
-Wre = Wre + Cos(Kx*Rx(L)+Ky*Ry(L)) 
-Wim = Wim + Sin(Kx*Rx(L)+Ky*Ry(L)) 
-} 
- 
-F = Wre*Wre + Wim*Wim 
構造因子.txt · 最終更新: 2014/03/12 15:42 by kimi
www.chimeric.de Creative Commons License Valid CSS Driven by DokuWiki do yourself a favour and use a real browser - get firefox!! Recent changes RSS feed Valid XHTML 1.0