Searched refs:work1_cfm (Results 1 – 2 of 2) sorted by relevance
| /dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
| H A D | xas_tdp_utils.F | 2690 TYPE(cp_cfm_type), POINTER :: dip_cfm, work1_cfm, work2_cfm local
2695 NULLIFY (para_env, blacs_env, dip_struct, full_struct, work1_cfm, work2_cfm, osc_str)
2717 CALL cp_cfm_create(work1_cfm, full_struct)
2733 CALL cp_fm_to_cfm(msourcer=amew_dip(i)%matrix, mtarget=work1_cfm)
2736 CALL cp_cfm_gemm('C', 'N', ntot, ntot, ntot, (1.0_dp, 0.0_dp), soc_evecs_cfm, work1_cfm, &
2757 CALL cp_cfm_release(work1_cfm)
2800 TYPE(cp_cfm_type), POINTER :: quad_cfm, work1_cfm, work2_cfm local
2805 NULLIFY (para_env, blacs_env, quad_struct, full_struct, work1_cfm, work2_cfm, osc_str)
2827 CALL cp_cfm_create(work1_cfm, full_struct)
2845 CALL cp_fm_to_cfm(msourcer=amew_quad(i)%matrix, mtarget=work1_cfm)
[all …]
|
| /dports/science/cp2k-data/cp2k-7.1.0/src/ |
| H A D | xas_tdp_utils.F | 3707 TYPE(cp_cfm_type), POINTER :: dip_cfm, work1_cfm, work2_cfm local
3712 NULLIFY (para_env, blacs_env, dip_struct, full_struct, work1_cfm, work2_cfm, osc_str)
3734 CALL cp_cfm_create(work1_cfm, full_struct)
3750 CALL cp_fm_to_cfm(msourcer=amew_dip(i)%matrix, mtarget=work1_cfm)
3753 CALL cp_cfm_gemm('C', 'N', ntot, ntot, ntot, (1.0_dp, 0.0_dp), soc_evecs_cfm, work1_cfm, &
3774 CALL cp_cfm_release(work1_cfm)
3817 TYPE(cp_cfm_type), POINTER :: quad_cfm, work1_cfm, work2_cfm local
3822 NULLIFY (para_env, blacs_env, quad_struct, full_struct, work1_cfm, work2_cfm, osc_str)
3844 CALL cp_cfm_create(work1_cfm, full_struct)
3862 CALL cp_fm_to_cfm(msourcer=amew_quad(i)%matrix, mtarget=work1_cfm)
[all …]
|