Searched refs:TmpKinr (Results 1 – 1 of 1) sorted by relevance
158 dcomplex ******TmpKinr; in Set_OLP_Kin() local180 …TmpKinr = Allocate6D_dcomplex(List_YOUSO[25]+1, List_YOUSO[24], (2*(List_YOUSO[25]+1)+1), (List_YO… in Set_OLP_Kin()273 TmpKinr[L0][Mul0][L0+M0][L1][Mul1][L1+M1] = Complex(0.0,0.0); in Set_OLP_Kin()475 TmpKinr[L0][Mul0][L0+M0][L1][Mul1][L1+M1] = in Set_OLP_Kin()476 Cadd(TmpKinr[L0][Mul0][L0+M0][L1][Mul1][L1+M1],Ctmp2); in Set_OLP_Kin()576 Ctmp0 = TmpKinr[L0][Mul0][L0+k][L1][Mul1][L1+M1]; in Set_OLP_Kin()802 Free6D_dcomplex(TmpKinr); in Set_OLP_Kin()