Home
last modified time | relevance | path

Searched refs:CmatNL0 (Results 1 – 2 of 2) sorted by relevance

/dports/science/openmx/openmx3.8/source/
H A DSet_Nonlocal.c178 dcomplex **CmatNL0; in Nonlocal0() local
259 CmatNL0 = (dcomplex**)malloc(sizeof(dcomplex*)*(2*(List_YOUSO[25]+1)+1)); in Nonlocal0()
261 CmatNL0[i] = (dcomplex*)malloc(sizeof(dcomplex)*(2*List_YOUSO[30]+1)); in Nonlocal0()
592 CmatNL0[L0+M0][L1+M1] = CsumNL0; in Nonlocal0()
611 Ctmp1 = Cmul(CmatNL0[L0+M0][L1+k],Comp2Real[L1][L1+M1][L1+k]); in Nonlocal0()
705 free(CmatNL0[i]); in Nonlocal0()
707 free(CmatNL0); in Nonlocal0()
H A DSet_ProExpn_VNA.c285 dcomplex **CmatNL0; in Set_ProExpn() local
364 CmatNL0 = (dcomplex**)malloc(sizeof(dcomplex*)*(2*(List_YOUSO[25]+1)+1)); in Set_ProExpn()
366 CmatNL0[i] = (dcomplex*)malloc(sizeof(dcomplex)*(2*List_YOUSO[35]+1)); in Set_ProExpn()
687 CmatNL0[L0+M0][L1+M1] = CsumNL0; in Set_ProExpn()
707 CsumNL0.r += (CmatNL0[L0+M0][L1+k].r*Comp2Real[L1][L1+M1][L1+k].r in Set_ProExpn()
708 - CmatNL0[L0+M0][L1+k].i*Comp2Real[L1][L1+M1][L1+k].i); in Set_ProExpn()
710 CsumNL0.i += (CmatNL0[L0+M0][L1+k].r*Comp2Real[L1][L1+M1][L1+k].i in Set_ProExpn()
711 + CmatNL0[L0+M0][L1+k].i*Comp2Real[L1][L1+M1][L1+k].r); in Set_ProExpn()
800 free(CmatNL0[i]); in Set_ProExpn()
802 free(CmatNL0); in Set_ProExpn()