| /dports/science/openmx/openmx3.8/source/ |
| H A D | TRAN_Calc_CurrentDensity.c | 31 NUM_c2 = NUM_c * NUM_c; in TRAN_Calc_Sinv()
55 F77_NAME(zgemm, ZGEMM)("N", "C", &NUM_c, &NUM_c, &NUM_c, &one, matrix1, &NUM_c, in TRAN_Calc_Sinv()
73 F77_NAME(zgemm, ZGEMM)(trans, trans, &NUM_c, &NUM_c, &NUM_c, &one, In2, &NUM_c, in TRAN_MatProds3()
74 In3, &NUM_c, &zero, Buf, &NUM_c); in TRAN_MatProds3()
75 F77_NAME(zgemm, ZGEMM)(trans, "N", &NUM_c, &NUM_c, &NUM_c, &one, In1, &NUM_c, in TRAN_MatProds3()
88 F77_NAME(zgemm, ZGEMM)(trans, trans, &NUM_c, &NUM_c, &NUM_c, &one, In4, &NUM_c, in TRAN_MatProds5()
89 In5, &NUM_c, &zero, Buf, &NUM_c); in TRAN_MatProds5()
90 F77_NAME(zgemm, ZGEMM)(trans, "N", &NUM_c, &NUM_c, &NUM_c, &one, In3, &NUM_c, in TRAN_MatProds5()
92 F77_NAME(zgemm, ZGEMM)(trans, "N", &NUM_c, &NUM_c, &NUM_c, &one, In2, &NUM_c, in TRAN_MatProds5()
94 F77_NAME(zgemm, ZGEMM)(trans, "N", &NUM_c, &NUM_c, &NUM_c, &one, In1, &NUM_c, in TRAN_MatProds5()
[all …]
|
| H A D | TRAN_Channel_Functions.c | 76 int NUM_c, in TRAN_Calc_OrtSpace() argument
97 NUM_c2 = NUM_c * NUM_c; in TRAN_Calc_OrtSpace()
132 int NUM_c, in TRAN_Calc_Linewidth() argument
169 int NUM_c, in TRAN_Calc_MatTrans() argument
181 v1 = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c* NUM_c); in TRAN_Calc_MatTrans()
183 F77_NAME(zgemm, ZGEMM)(trans1, "N", &NUM_c, &NUM_c, &NUM_c, &alpha, GC_R, &NUM_c, in TRAN_Calc_MatTrans()
184 SigmaL_R, &NUM_c, &beta, v1, &NUM_c); in TRAN_Calc_MatTrans()
186 F77_NAME(zgemm, ZGEMM)("N", trans2, &NUM_c, &NUM_c, &NUM_c, &alpha, v1, &NUM_c, in TRAN_Calc_MatTrans()
187 GC_R, &NUM_c, &beta, SigmaL_R, &NUM_c); in TRAN_Calc_MatTrans()
215 F77_NAME(zgemm, ZGEMM)("C", "N", &NUM_cs, &NUM_c, &NUM_c, &alpha, rtS, &NUM_c, in TRAN_Calc_LowdinOrt()
[all …]
|
| H A D | MTRAN_EigenChannel.c | 28 int NUM_c,
35 int NUM_c,
43 int NUM_c,
53 int NUM_c,
76 int NUM_c,
95 int NUM_c,
110 int NUM_c, in MTRAN_EigenChannel() argument
150 GC_R = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c* NUM_c); in MTRAN_EigenChannel()
153 rtS = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c* NUM_c); in MTRAN_EigenChannel()
154 rtSinv = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c* NUM_c); in MTRAN_EigenChannel()
[all …]
|
| H A D | TRAN_DFT_Dosout.c | 129 NUM_c = i*2; in TRAN_DFT_Kdependent_NC()
140 TRAN_Set_Value_double(SCC_nc,NUM_c*NUM_c, 0.0,0.0); in TRAN_DFT_Kdependent_NC()
144 TRAN_Set_Value_double(HCC_nc,NUM_c*NUM_c, 0.0,0.0); in TRAN_DFT_Kdependent_NC()
178 GCR = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c* NUM_c); in TRAN_DFT_Kdependent_NC()
179 GCA = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c* NUM_c); in TRAN_DFT_Kdependent_NC()
182 SigmaL = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c* NUM_c); in TRAN_DFT_Kdependent_NC()
183 SigmaR = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c* NUM_c); in TRAN_DFT_Kdependent_NC()
184 v1 = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c* NUM_c); in TRAN_DFT_Kdependent_NC()
312 …tmpr =-0.5*(GCR[ (Bnum+j-1+NUM_c/2)*NUM_c+(Anum+i+NUM_c/2)-1 ].i - GCA[ (Bnum+j-1+NUM_c/2)*NUM_c+(… in TRAN_DFT_Kdependent_NC()
313 …tmpi = 0.5*(GCR[ (Bnum+j-1+NUM_c/2)*NUM_c+(Anum+i+NUM_c/2)-1 ].r - GCA[ (Bnum+j-1+NUM_c/2)*NUM_c+(… in TRAN_DFT_Kdependent_NC()
[all …]
|
| H A D | TRAN_Allocate_NC.c | 61 TRAN_Set_MP(0, atomnum, WhatSpecies, Spe_Total_CNO, &NUM_c, &i); in TRAN_Allocate_Cregion_NC()
62 NUM_c=2*NUM_c; in TRAN_Allocate_Cregion_NC()
65 printf("<TRAN_Allocate_Cregion: NUM_c=%d NUM_e=%d %d>\n",NUM_c, NUM_e[0],NUM_e[1]); in TRAN_Allocate_Cregion_NC()
69 SCC_nc = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c*NUM_c); in TRAN_Allocate_Cregion_NC()
70 SCL_nc = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c*NUM_e[0]); in TRAN_Allocate_Cregion_NC()
71 SCR_nc = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c*NUM_e[1]); in TRAN_Allocate_Cregion_NC()
72 HCC_nc = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c*NUM_c); in TRAN_Allocate_Cregion_NC()
73 HCL_nc = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c*NUM_e[0]); in TRAN_Allocate_Cregion_NC()
74 HCR_nc = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c*NUM_e[1]); in TRAN_Allocate_Cregion_NC()
|
| H A D | TRAN_DFT_NC.c | 66 int NUM_c,
926 NUM_c = 2*NUM_c; in TRAN_DFT_Kdependent()
929 TRAN_Set_Value_double(SCC_nc,NUM_c*NUM_c, 0.0,0.0); in TRAN_DFT_Kdependent()
932 TRAN_Set_Value_double(HCC_nc,NUM_c*NUM_c, 0.0,0.0); in TRAN_DFT_Kdependent()
979 v20 = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c* NUM_c); in TRAN_DFT_Kdependent()
980 TRAN_Set_Value_double( v20, NUM_c*NUM_c, 0.0, 0.0); in TRAN_DFT_Kdependent()
982 GC = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c* NUM_c); in TRAN_DFT_Kdependent()
990 work1 = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c* NUM_c); in TRAN_DFT_Kdependent()
991 work2 = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c* NUM_c); in TRAN_DFT_Kdependent()
1312 int NUM_c, in TRAN_Add_MAT() argument
[all …]
|
| H A D | TRAN_Allocate.c | 62 TRAN_Set_MP(0, atomnum, WhatSpecies, Spe_Total_CNO, &NUM_c, &i); in TRAN_Allocate_Cregion()
65 printf("<TRAN_Allocate_Cregion: NUM_c=%d NUM_e=%d %d>\n",NUM_c, NUM_e[0],NUM_e[1]); in TRAN_Allocate_Cregion()
69 SCC = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c*NUM_c); in TRAN_Allocate_Cregion()
70 SCL = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c*NUM_e[0]); in TRAN_Allocate_Cregion()
71 SCR = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c*NUM_e[1]); in TRAN_Allocate_Cregion()
76 HCC[k] = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c*NUM_c); in TRAN_Allocate_Cregion()
77 HCL[k] = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c*NUM_e[0]); in TRAN_Allocate_Cregion()
78 HCR[k] = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c*NUM_e[1]); in TRAN_Allocate_Cregion()
|
| H A D | TRAN_DFT.c | 94 int NUM_c,
1246 TRAN_Set_Value_double(SCC,NUM_c*NUM_c, 0.0,0.0); in TRAN_DFT_Kdependent()
1250 TRAN_Set_Value_double(HCC[k],NUM_c*NUM_c, 0.0,0.0); in TRAN_DFT_Kdependent()
1292 v2[k] = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c*NUM_c); in TRAN_DFT_Kdependent()
1293 TRAN_Set_Value_double( v2[k], NUM_c*NUM_c, 0.0, 0.0); in TRAN_DFT_Kdependent()
1296 GC = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c* NUM_c); in TRAN_DFT_Kdependent()
1301 SigmaL = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c* NUM_c); in TRAN_DFT_Kdependent()
1304 work1 = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c* NUM_c); in TRAN_DFT_Kdependent()
1305 work2 = (dcomplex*)malloc(sizeof(dcomplex)*NUM_c* NUM_c); in TRAN_DFT_Kdependent()
1552 int NUM_c, in TRAN_Add_MAT() argument
[all …]
|
| H A D | TRAN_Main_Analysis.c | 161 int NUM_c,
187 int NUM_c,
206 int NUM_c,
211 int NUM_c,
228 int NUM_c,
279 int NUM_c,
780 NUM_c, in TRAN_Main_Analysis()
809 NUM_c, in TRAN_Main_Analysis()
3784 for (i=0;i<NUM_c*NUM_c;i++) { in MTRAN_Set_CentOverlap()
4138 for (i=0; i<NUM_c*NUM_c; i++) { in MTRAN_Allocate_HS()
[all …]
|
| H A D | TRAN_Set_CentOverlap.c | 44 #define SCC_ref(i,j) ( ((j)-1)*NUM_c + (i)-1 )
45 #define SCL_ref(i,j) ( ((j)-1)*NUM_c + (i)-1 )
46 #define SCR_ref(i,j) ( ((j)-1)*NUM_c + (i)-1 )
98 MP = (int*)malloc(sizeof(int)*(NUM_c+1)); in TRAN_Set_CentOverlap()
117 for (i=0; i<NUM_c*NUM_c; i++) { in TRAN_Set_CentOverlap()
382 TRAN_FPrint2_double("zSCC",NUM_c, NUM_c, SCC); in TRAN_Set_CentOverlap()
383 TRAN_FPrint2_double("zSCL",NUM_c, NUM_e[0], SCL); in TRAN_Set_CentOverlap()
384 TRAN_FPrint2_double("zSCR",NUM_c, NUM_e[1], SCR); in TRAN_Set_CentOverlap()
386 TRAN_FPrint2_double("zHCC0",NUM_c, NUM_c, HCC[0]); in TRAN_Set_CentOverlap()
387 TRAN_FPrint2_double("zHCL0",NUM_c, NUM_e[0], HCL[0]); in TRAN_Set_CentOverlap()
[all …]
|
| H A D | TRAN_Main_Analysis_NC.c | 162 int NUM_c,
189 int NUM_c,
208 int NUM_c,
213 int NUM_c,
230 int NUM_c,
281 int NUM_c,
761 NUM_c, in TRAN_Main_Analysis_NC()
3864 for (i=0; i<NUM_c*NUM_c; i++) { in MTRAN_Set_CentOverlap()
3877 for (i=0; i<NUM_c*NUM_c; i++) { in MTRAN_Set_CentOverlap()
4402 for (i=0; i<NUM_c*NUM_c; i++) { in MTRAN_Allocate_HS()
[all …]
|
| H A D | TRAN_Channel_Output.c | 161 int NUM_c, in TRAN_Output_ChannelLCAO() argument
167 #define GC_R_ref(i,j) GC_R[NUM_c*((j)-1)+(i)-1] in TRAN_Output_ChannelLCAO()
185 for (i = 0; i < NUM_c; i++){ in TRAN_Output_ChannelLCAO()
209 for (i = 0; i < NUM_c; i++){ in TRAN_Output_ChannelLCAO()
255 num1 = NUM_c / num0 + 1 * (NUM_c%num0 != 0); in TRAN_Output_ChannelLCAO()
269 if (j1 <= NUM_c){ in TRAN_Output_ChannelLCAO()
368 if (0 < i1 && i1 <= NUM_c && 0 < j1 && j1 <= NUM_c){ in TRAN_Output_ChannelLCAO()
374 if (0 < i1 && i1 <= NUM_c / 2 && 0 < j1 && j1 <= NUM_c){ in TRAN_Output_ChannelLCAO()
377 fprintf(fp_EV, " %8.5f", GC_R_ref(i1 + NUM_c / 2, j1).r); in TRAN_Output_ChannelLCAO()
378 fprintf(fp_EV, " %8.5f", GC_R_ref(i1 + NUM_c / 2, j1).i); in TRAN_Output_ChannelLCAO()
[all …]
|
| H A D | TRAN_Set_CentOverlap_NC.c | 579 TRAN_FPrint2_double("zSCC",NUM_c, NUM_c, SCC); in TRAN_Set_CentOverlap_NC()
580 TRAN_FPrint2_double("zSCL",NUM_c, NUM_e[0], SCL); in TRAN_Set_CentOverlap_NC()
581 TRAN_FPrint2_double("zSCR",NUM_c, NUM_e[1], SCR); in TRAN_Set_CentOverlap_NC()
583 TRAN_FPrint2_double("zHCC0",NUM_c, NUM_c, HCC[0]); in TRAN_Set_CentOverlap_NC()
584 TRAN_FPrint2_double("zHCL0",NUM_c, NUM_e[0], HCL[0]); in TRAN_Set_CentOverlap_NC()
585 TRAN_FPrint2_double("zHCR0",NUM_c, NUM_e[1], HCR[0]); in TRAN_Set_CentOverlap_NC()
|
| H A D | TRAN_Output_Trans_HS.c | 245 iv[i++]= NUM_c; in TRAN_Output_Trans_HS_Normal()
803 NUM_c = 0; in TRAN_Output_Trans_HS_Direct()
806 NUM_c += Spe_Total_CNO[wanA]; in TRAN_Output_Trans_HS_Direct()
809 if ( SpinP_switch == 3 ) { NUM_c = NUM_c*2; } in TRAN_Output_Trans_HS_Direct()
815 iv[i++]= NUM_c; in TRAN_Output_Trans_HS_Direct()
816 iv[i++]= NUM_c; in TRAN_Output_Trans_HS_Direct()
817 iv[i++]= NUM_c; in TRAN_Output_Trans_HS_Direct()
|
| H A D | TRAN_CDen_Main.c | 14 static void TRAN_Calc_Orb2Real(int NUM_c, int *MP, double **JOrb, double *JReal, in TRAN_Calc_Orb2Real() argument
78 static void TRAN_Current_dOrb(int NUM_c, int *MP, in TRAN_Current_dOrb() argument
96 for (i = 0; i < NUM_c; i++){ in TRAN_Current_dOrb()
97 for (j = 0; j < NUM_c; j++){ in TRAN_Current_dOrb()
1248 int NUM_c, in TRAN_CDen_Main() argument
1305 TRAN_Calc_Orb2Real(NUM_c, MP, Rho[ispin], RRho, SCC); in TRAN_CDen_Main()
1307 TRAN_Calc_Orb2Real(NUM_c, MP, Jmat[ispin][0], RJmat[0], SCC); in TRAN_CDen_Main()
1308 TRAN_Calc_Orb2Real(NUM_c, MP, Jmat[ispin][1], RJmat[1], SCC); in TRAN_CDen_Main()
1310 TRAN_Current_dOrb(NUM_c, MP, JLocSym[ispin], in TRAN_CDen_Main()
|
| H A D | tran_variables.h | 104 int NUM_c; variable
|
| /dports/databases/postgresql96-server/postgresql-9.6.24/src/backend/utils/adt/ |
| H A D | formatting.c | 676 NUM_c, enumerator
890 -1, -1, -1, -1, -1, -1, -1, -1, NUM_b, NUM_c,
|
| /dports/databases/postgresql96-pltcl/postgresql-9.6.24/src/backend/utils/adt/ |
| H A D | formatting.c | 676 NUM_c, enumerator
890 -1, -1, -1, -1, -1, -1, -1, -1, NUM_b, NUM_c,
|
| /dports/databases/postgresql96-plpython/postgresql-9.6.24/src/backend/utils/adt/ |
| H A D | formatting.c | 676 NUM_c, enumerator
890 -1, -1, -1, -1, -1, -1, -1, -1, NUM_b, NUM_c,
|
| /dports/databases/postgresql10-plperl/postgresql-10.19/src/backend/utils/adt/ |
| H A D | formatting.c | 688 NUM_c, enumerator
902 -1, -1, -1, -1, -1, -1, -1, -1, NUM_b, NUM_c,
|
| /dports/databases/postgresql11-client/postgresql-11.14/src/backend/utils/adt/ |
| H A D | formatting.c | 681 NUM_c, enumerator
897 -1, -1, -1, -1, -1, -1, -1, -1, NUM_b, NUM_c,
|
| /dports/databases/postgresql10-pltcl/postgresql-10.19/src/backend/utils/adt/ |
| H A D | formatting.c | 688 NUM_c, enumerator
902 -1, -1, -1, -1, -1, -1, -1, -1, NUM_b, NUM_c,
|
| /dports/databases/postgresql10-client/postgresql-10.19/src/backend/utils/adt/ |
| H A D | formatting.c | 688 NUM_c, enumerator
902 -1, -1, -1, -1, -1, -1, -1, -1, NUM_b, NUM_c,
|
| /dports/databases/postgresql10-contrib/postgresql-10.19/src/backend/utils/adt/ |
| H A D | formatting.c | 688 NUM_c, enumerator
902 -1, -1, -1, -1, -1, -1, -1, -1, NUM_b, NUM_c,
|
| /dports/databases/postgresql10-docs/postgresql-10.19/src/backend/utils/adt/ |
| H A D | formatting.c | 688 NUM_c, enumerator
902 -1, -1, -1, -1, -1, -1, -1, -1, NUM_b, NUM_c,
|