/dports/science/chemps2/CheMPS2-1.8.10/CheMPS2/ |
H A D | TensorKM.cpp | 58 …double * BlockTdown = denT->gStorage(sector_nelec_up[ikappa], sector_spin_up[ikappa], sector_irrep… in construct() local 64 …dgemm_(&trans,¬rans,&dimUR,&dimDR,&dimL,&alpha,BlockTup,&dimL,BlockTdown,&dimL,&beta,storage+ka… in construct() 82 …double * BlockTdown = denT->gStorage(sector_nelec_up[ikappa]-1, sector_spin_down[ikappa], IDR, sec… in construct() local 89 …dgemm_(&trans,¬rans,&dimUR,&dimDR,&dimL,&alpha,BlockTup,&dimL,BlockTdown,&dimL,&beta,storage+ka… in construct()
|
H A D | TensorS0.cpp | 64 …double * BlockTdown = denT->gStorage(sector_nelec_up[ikappa], sector_spin_up[ikappa], sector_irrep… in makenewRight() local 70 …dgemm_(&trans,¬rans,&dimUR,&dimDR,&dimL,&alpha,BlockTup,&dimL,BlockTdown,&dimL,&beta,storage+ka… in makenewRight() 88 …double * BlockTdown = denT->gStorage(sector_nelec_up[ikappa]+2, sector_spin_up[ikappa], sector_irr… in makenewLeft() local 94 …dgemm_(¬rans,&trans,&dimUL,&dimDL,&dimR,&alpha,BlockTup,&dimUL,BlockTdown,&dimDL,&beta,storage+… in makenewLeft() 147 …double * BlockTdown = denT->gStorage(NLU+1, TwoSLD, ILD, sector_nelec_up[ikappa]+2, sector_spin_up… in makenewRight() local 166 …dgemm_(¬rans,¬rans,&dimUR,&dimDR,&dimLD,&alpha,workmem,&dimUR,BlockTdown,&dimLD,&beta,storag… in makenewRight() 220 …double * BlockTdown = denT->gStorage(sector_nelec_up[ikappa]+2, sector_spin_up[ikappa], IDL, … in makenewLeft() local 239 …dgemm_(¬rans,&trans,&dimUL,&dimDL,&dimRD,&alpha,workmem,&dimUL,BlockTdown,&dimDL,&beta,storage+… in makenewLeft()
|
H A D | TensorF1.cpp | 103 …double * BlockTdown = denT->gStorage(sector_nelec_up[ikappa], sector_spin_down[ikappa], sector_irr… in makenewLeft() local 111 …dgemm_(¬rans,&trans,&dimLU,&dimLD,&dimR,&alpha,BlockTup,&dimLU,BlockTdown,&dimLD,&beta,storage+… in makenewLeft() 166 …double * BlockTdown = denT->gStorage(NLU+1, TwoSLD, ILD, sector_nelec_up[ikappa], sector_spin_down… in makenewRight() local 186 …dgemm_(¬rans,¬rans,&dimUR,&dimDR,&dimLD,&alpha,workmem,&dimUR,BlockTdown,&dimLD,&beta,storag… in makenewRight() 240 …double * BlockTdown = denT->gStorage(sector_nelec_up[ikappa], sector_spin_down[ikappa], IDL, … in makenewLeft() local 262 …dgemm_(¬rans,&trans,&dimUL,&dimDL,&dimRD,&alpha,workmem,&dimUL,BlockTdown,&dimDL,&beta,storage+… in makenewLeft()
|
H A D | TensorX.cpp | 214 …double * BlockTdown = denT->gStorage(NLdown, TwoSLdown, ILdown, sector_nelec_up[ikappa], sector_sp… in addTermQLRight() local 253 …dgemm_(¬r,¬r,&dimR,&dimR,&dimLdown,&factor,workmemLR,&dimR,BlockTdown,&dimLdown,&beta,workme… in addTermQLRight() 317 …double * BlockTdown = denT->gStorage(sector_nelec_up[ikappa], sector_spin_up[ikappa], sector_irrep… in addTermQLLeft() local 356 …dgemm_(¬r,&trans,&dimL,&dimL,&dimRdown,&factor,workmemLR,&dimL,BlockTdown,&dimL,&beta,workmemLL… in addTermQLLeft() 382 …double * BlockTdown = denT->gStorage(sector_nelec_up[ikappa], sector_spin_up[ikappa], sector_irr… in addTermARight() local 394 …dgemm_(¬r,¬r,&dimR,&dimR,&dimLdown,&factor,workmemLR,&dimR,BlockTdown,&dimLdown,&beta,workme… in addTermARight() 433 …dgemm_(¬r,&trans,&dimL,&dimL,&dimRdown,&factor,workmemLR,&dimL,BlockTdown,&dimL,&beta,workmemLL… in addTermALeft() 572 …double * BlockTdown = (TwoSLup==TwoSLdown)? BlockTup : denT->gStorage(NL,TwoSLdown,IL,sector_nelec… in addTermDRight() local 584 …dgemm_(&totrans, &totrans, &dimR, &dimR, &dimLdown, &factor, workmemLR, &dimR, BlockTdown, &dimLdo… in addTermDRight() 626 …double * BlockTdown = (TwoSRup == TwoSRdown)? BlockTup : denT->gStorage(sector_nelec_up[ikappa],se… in addTermDLeft() local [all …]
|
H A D | TensorS1.cpp | 93 …double * BlockTdown = denT->gStorage(NLU+1, TwoSLD, ILD, sector_nelec_up[ikappa]+2, sector_spin_do… in makenewRight() local 113 …dgemm_(¬rans,¬rans,&dimUR,&dimDR,&dimLD,&alpha,workmem,&dimUR,BlockTdown,&dimLD,&beta,storag… in makenewRight() 167 …double * BlockTdown = denT->gStorage(sector_nelec_up[ikappa]+2, sector_spin_down[ikappa], IDL, … in makenewLeft() local 188 …dgemm_(¬rans,&trans,&dimUL,&dimDL,&dimRD,&alpha,workmem,&dimUL,BlockTdown,&dimDL,&beta,storage+… in makenewLeft()
|
H A D | TensorF0.cpp | 186 …double * BlockTdown = denT->gStorage(NLU+1, TwoSLD, ILD, sector_nelec_up[ikappa], sector_spin_up[i… in makenewRight() local 205 …dgemm_(¬rans,¬rans,&dimUR,&dimDR,&dimLD,&alpha,workmem,&dimUR,BlockTdown,&dimLD,&beta,storag… in makenewRight() 259 …double * BlockTdown = denT->gStorage(sector_nelec_up[ikappa], sector_spin_up[ikappa], IDL, … in makenewLeft() local 278 …dgemm_(¬rans,&trans,&dimUL,&dimDL,&dimRD,&alpha,workmem,&dimUL,BlockTdown,&dimDL,&beta,storage+… in makenewLeft()
|