// 格子定数 bohr a = 8.95; // 格子定数 a (bohr) boa = 1; // b/a coa = 0.673; // c/a // *** 計算するk点のパス *** // sc // kx ky kz k = [0 , 0 , 0 ; // Gamma (1 / 2), 0 , 0 ; // X (1 / 2), (1 / 2), 0 ; // M 0 , 0 , 0 ; // Gamma 0 , 0 , (1 / 2); // Z (1 / 2), 0 , (1 / 2); // R (1 / 2), (1 / 2), (1 / 2)] // A