Searched refs:tens_48 (Results 1 – 1 of 1) sorted by relevance
845 … TensorS1 * tens_48 = (( orb_m == orb_n ) ? NULL : new TensorS1( orb_i, irrep_mn, true, book )); in fill_site() local849 … fill_tens_46_48( denT, tens_48, F1tensors[orb_i][orb_n-orb_m][orb_m-1-orb_i], workmem, false ); } in fill_site()870 …const double d48 = (( cnt1 == 0 ) ? 0.0 : tens_48->inproduct(S1tensors[orb_i-1][cnt1][orb_i-1-orb_… in fill_site()887 delete tens_48; } in fill_site()