Home
last modified time | relevance | path

Searched refs:achint (Results 1 – 18 of 18) sorted by relevance

/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/
H A Dcommutator_rpnl.F98 REAL(KIND=dp), DIMENSION(:, :, :), POINTER :: achint, acint, bchint, bcint local
247 clist%achint(nsgfa, nppnl, maxder))
249 clist%achint = 0._dp
288 clist%maxach = MAXVAL(ABS(clist%achint(:, :, 1)))
350 achint => alist_ac%clist(kac)%achint
351 bchint => alist_bc%clist(kbc)%achint
358 CALL dgemm("N", "T", na, nb, np, 1._dp, achint(1, 1, 1), na, &
360 CALL dgemm("N", "T", na, nb, np, 1._dp, achint(1, 1, 1), na, &
449 REAL(KIND=dp), DIMENSION(:, :, :), POINTER :: achint, acint, bchint, bcint local
639 achint => alist_ac%clist(kac)%achint
[all …]
H A Dcore_ppnl.F127 REAL(KIND=dp), DIMENSION(:, :, :), POINTER :: achint, acint, bchint, bcint, c_nl local
337 clist%achint(nsgfa, nppnl, maxder))
339 clist%achint = 0._dp
388 clist%achint(sgfa:sgfa + na - 1, 1:nb, i) = &
413 clist%achint(sgfa:ncoc, j, i) = clist%acint(sgfa:ncoc, j, i)*hprj(j)
419 clist%maxach = MAXVAL(ABS(clist%achint(:, :, 1)))
516 achint => alist_ac%clist(kac)%achint
517 bchint => alist_bc%clist(kbc)%achint
526 … MATMUL(achint(1:na, 1:np, 1), TRANSPOSE(bcint(1:nb, 1:np, 1)))
541 … MATMUL(achint(1:na, 1:np, 1), TRANSPOSE(bcint(1:nb, 1:np, j))))
[all …]
H A Dsap_kind_types.F49 REAL(KIND=dp), DIMENSION(:, :, :), POINTER :: achint component
101 IF (ASSOCIATED(clist%achint)) THEN
102 DEALLOCATE (clist%achint)
500 clist%achint(nsgfa, nppnl, maxder))
502 clist%achint = 0._dp
566 clist%achint(sgfa:sgfa + na - 1, 1:nb, i) = &
605 clist%achint(sgfa:ncoc, j, i) = clist%acint(sgfa:ncoc, j, i)*hprj(j)
611 clist%maxach = MAXVAL(ABS(clist%achint(:, :, 1)))
H A Dqs_oce_methods.F537 NULLIFY (clist%acint, clist%achint, clist%sgf_list)
561 ALLOCATE (clist%achint(nsgfa, nsobtot, maxder))
562 clist%achint = 0._dp
564 clist%achint(1:nsgfa, 1:nsobtot, 1) = TRANSPOSE(oceh(1)%block(1:nsobtot, 1:nsgfa))
H A Dqs_ks_atom.F424 C_coeff_hh_a => alist_ac%clist(kac)%achint
434 C_coeff_hh_b => alist_bc%clist(kbc)%achint
H A Dqs_rho_atom_methods.F716 C_coeff_hh_a => alist_ac%clist(kac)%achint(:, :, 1)
725 C_coeff_hh_b => alist_bc%clist(kbc)%achint(:, :, 1)
H A Dqs_linres_atom_current.F412 C_coeff_hh_a => alist_ac%clist(kac)%achint(:, :, 1)
422 C_coeff_hh_b => alist_bc%clist(kbc)%achint(:, :, 1)
H A Dqs_dftb_coulomb.F704 NULLIFY (clist%achint)
H A Dxtb_coulomb.F902 NULLIFY (clist%achint)
/dports/science/cp2k-data/cp2k-7.1.0/src/
H A Dcommutator_rpnl.F91 REAL(KIND=dp), DIMENSION(:, :, :), POINTER :: achint, acint, bchint, bcint local
240 clist%achint(nsgfa, nppnl, maxder))
242 clist%achint = 0._dp
281 clist%maxach = MAXVAL(ABS(clist%achint(:, :, 1)))
343 achint => alist_ac%clist(kac)%achint
344 bchint => alist_bc%clist(kbc)%achint
351 CALL dgemm("N", "T", na, nb, np, 1._dp, achint(1, 1, 1), na, &
353 CALL dgemm("N", "T", na, nb, np, 1._dp, achint(1, 1, 1), na, &
355 CALL dgemm("N", "T", na, nb, np, 1._dp, achint(1, 1, 1), na, &
358 CALL dgemm("N", "T", na, nb, np, -1._dp, achint(1, 1, 2), na, &
[all …]
H A Dcore_ppnl.F127 REAL(KIND=dp), DIMENSION(:, :, :), POINTER :: achint, acint, bchint, bcint, c_nl local
316 clist%achint(nsgfa, nppnl, maxder))
318 clist%achint = 0._dp
357 … vprj_ppnl(1, 1), SIZE(vprj_ppnl, 1), 0.0_dp, clist%achint(sgfa, 1, i), nsgfa)
375 clist%achint(sgfa:ncoc, j, i) = clist%acint(sgfa:ncoc, j, i)*hprj(j)
381 clist%maxach = MAXVAL(ABS(clist%achint(:, :, 1)))
463 achint => alist_ac%clist(kac)%achint
464 bchint => alist_bc%clist(kbc)%achint
470 CALL dgemm("N", "T", na, nb, np, 1._dp, achint(1, 1, 1), na, &
487 … MATMUL(achint(1:na, 1:np, 1), TRANSPOSE(bcint(1:nb, 1:np, j))))
[all …]
H A Dsap_kind_types.F31 REAL(KIND=dp), DIMENSION(:, :, :), POINTER :: achint component
83 IF (ASSOCIATED(clist%achint)) THEN
84 DEALLOCATE (clist%achint)
H A Dqs_oce_methods.F499 NULLIFY (clist%acint, clist%achint, clist%sgf_list)
523 ALLOCATE (clist%achint(nsgfa, nsobtot, maxder))
524 clist%achint = 0._dp
526 clist%achint(1:nsgfa, 1:nsobtot, 1) = TRANSPOSE(oceh(1)%block(1:nsobtot, 1:nsgfa))
H A Dqs_ks_atom.F411 C_coeff_hh_a => alist_ac%clist(kac)%achint
421 C_coeff_hh_b => alist_bc%clist(kbc)%achint
H A Dqs_rho_atom_methods.F716 C_coeff_hh_a => alist_ac%clist(kac)%achint(:, :, 1)
725 C_coeff_hh_b => alist_bc%clist(kbc)%achint(:, :, 1)
H A Dqs_linres_atom_current.F412 C_coeff_hh_a => alist_ac%clist(kac)%achint(:, :, 1)
422 C_coeff_hh_b => alist_bc%clist(kbc)%achint(:, :, 1)
H A Dqs_dftb_coulomb.F704 NULLIFY (clist%achint)
H A Dxtb_coulomb.F902 NULLIFY (clist%achint)