Searched refs:eig_semi_can (Results 1 – 2 of 2) sorted by relevance
712 ALLOCATE (eig_semi_can(dimen))713 eig_semi_can = 0.0_dp714 eig_semi_can(1:homo) = eig_o(:)715 eig_semi_can(homo + 1:dimen) = eig_v(:)762 (eig_semi_can(i_global) - eig_semi_can(j_global + homo))769 DEALLOCATE (eig_semi_can)820 ALLOCATE (eig_semi_can(dimen))821 eig_semi_can = 0.0_dp822 eig_semi_can(1:homo_beta) = eig_o(:)861 (eig_semi_can(i_global) - eig_semi_can(j_global + homo_beta))[all …]