Searched refs:SCC_ref (Results 1 – 4 of 4) sorted by relevance
/dports/science/openmx/openmx3.8/source/ |
H A D | TRAN_Calc_CentGreen.c | 33 #define SCC_ref(i,j) SCC[nc*((j)-1)+(i)-1] in TRAN_Calc_CentGreen() macro 46 GC_ref(i,j).r = w.r*SCC_ref(i,j).r - w.i*SCC_ref(i,j).i - HCC_ref(i,j).r in TRAN_Calc_CentGreen() 48 GC_ref(i,j).i = w.r*SCC_ref(i,j).i + w.i*SCC_ref(i,j).r - HCC_ref(i,j).i in TRAN_Calc_CentGreen()
|
H A D | TRAN_Set_CentOverlap.c | 44 #define SCC_ref(i,j) ( ((j)-1)*NUM_c + (i)-1 ) macro 161 SCC[SCC_ref(Anum+i,Bnum+j)].r += co*S1[q]; in TRAN_Set_CentOverlap() 162 SCC[SCC_ref(Anum+i,Bnum+j)].i += si*S1[q]; in TRAN_Set_CentOverlap() 165 HCC[k][SCC_ref(Anum+i,Bnum+j)].r += co*H1[k][q]; in TRAN_Set_CentOverlap() 166 HCC[k][SCC_ref(Anum+i,Bnum+j)].i += si*H1[k][q]; in TRAN_Set_CentOverlap() 220 SCC[SCC_ref(Anum+i,Bnum+j)] = S00_e[iside][S00l_ref(Anum_e+i,Bnum_e+j)]; in TRAN_Set_CentOverlap() 223 HCC[k][SCC_ref(Anum+i,Bnum+j)] = H00_e[iside][k][S00l_ref(Anum_e+i,Bnum_e+j)]; in TRAN_Set_CentOverlap() 271 SCC[SCC_ref(Anum+i,Bnum+j)] = S00_e[iside][S00r_ref(Anum_e+i,Bnum_e+j)]; in TRAN_Set_CentOverlap() 274 HCC[k][SCC_ref(Anum+i,Bnum+j)] = H00_e[iside][k][S00r_ref(Anum_e+i,Bnum_e+j)]; in TRAN_Set_CentOverlap()
|
H A D | TRAN_Main_Analysis.c | 33 #define SCC_ref(i,j) ( ((j)-1)*NUM_c + (i)-1 ) macro 3832 SCC[SCC_ref(Anum + i, Bnum + j)].r += co*OLP[0][GA_AN][LB_AN][i][j]; in MTRAN_Set_CentOverlap() 3833 SCC[SCC_ref(Anum + i, Bnum + j)].i += si*OLP[0][GA_AN][LB_AN][i][j]; in MTRAN_Set_CentOverlap() 3836 HCC[k][SCC_ref(Anum + i, Bnum + j)].r += co*H[k][GA_AN][LB_AN][i][j]; in MTRAN_Set_CentOverlap() 3837 HCC[k][SCC_ref(Anum + i, Bnum + j)].i += si*H[k][GA_AN][LB_AN][i][j]; in MTRAN_Set_CentOverlap() 3888 SCC[SCC_ref(Anum + i, Bnum + j)] = S00_e[iside][S00l_ref(Anum_e + i, Bnum_e + j)]; in MTRAN_Set_CentOverlap() 3890 VCC[k][SCC_ref(Anum + i, Bnum + j)].r = VCC[k][SCC_ref(Anum + i, Bnum + j)].r in MTRAN_Set_CentOverlap() 3892 VCC[k][SCC_ref(Anum + i, Bnum + j)].i = VCC[k][SCC_ref(Anum + i, Bnum + j)].i in MTRAN_Set_CentOverlap() 3939 SCC[SCC_ref(Anum + i, Bnum + j)] = S00_e[iside][S00r_ref(Anum_e + i, Bnum_e + j)]; in MTRAN_Set_CentOverlap() 3941 VCC[k][SCC_ref(Anum + i, Bnum + j)].r = VCC[k][SCC_ref(Anum + i, Bnum + j)].r in MTRAN_Set_CentOverlap() [all …]
|
H A D | TRAN_Calc_CentGreenLesser.c | 49 #define SCC_ref(i,j) SCC[nc*((j)-1)+(i)-1] in TRAN_Calc_CentGreenLesser() macro
|