Home
last modified time | relevance | path

Searched refs:matrix_hz (Results 1 – 4 of 4) sorted by relevance

/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dec_env_types.F87 TYPE(dbcsr_p_type), DIMENSION(:), POINTER :: matrix_hz component
142 IF (ASSOCIATED(ec_env%matrix_hz)) CALL dbcsr_deallocate_matrix_set(ec_env%matrix_hz)
143 NULLIFY (ec_env%matrix_hz)
H A Dresponse_solver.F307 TYPE(dbcsr_p_type), DIMENSION(:), POINTER :: matrix_hz local
587 hmat=matrix_hz(ispin), &
605 ks_matrix=matrix_hz, &
744 CALL dbcsr_create(dbwork, template=matrix_hz(1)%matrix)
751 CALL dbcsr_copy(dbwork, matrix_hz(ispin)%matrix)
754 CALL dbcsr_add(matrix_hz(ispin)%matrix, dbwork, 1.0_dp, 1.0_dp)
793 mhz(ispin, 1)%matrix => matrix_hz(ispin)%matrix
810 CALL dbcsr_create(dbwork, template=matrix_hz(1)%matrix)
817 CALL dbcsr_copy(dbwork, matrix_hz(ispin)%matrix)
912 TYPE(dbcsr_p_type), DIMENSION(:, :), POINTER :: matrix_hz local
[all …]
H A Dec_environment.F116 NULLIFY (ec_env%matrix_hz)
H A Denergy_corrections.F341 ec_env%matrix_hz)
985 CALL dbcsr_allocate_matrix_set(ec_env%matrix_hz, nspins)
987 ALLOCATE (ec_env%matrix_hz(ispin)%matrix)
988 CALL dbcsr_create(ec_env%matrix_hz(ispin)%matrix, template=matrix_v(ispin, 1)%matrix)
989 CALL dbcsr_copy(matrix_v(ispin, 1)%matrix, ec_env%matrix_hz(ispin)%matrix)