calc_amp_kp_hamil Function

public function calc_amp_kp_hamil(parent_sign, prob, av_nspawn, HEl) result(child_sign)

Arguments

Type IntentOptional Attributes Name
real(kind=dp), intent(in) :: parent_sign(lenof_all_signs)
real(kind=dp), intent(in) :: prob
real(kind=dp), intent(in) :: av_nspawn
real(kind=dp), intent(in) :: HEl

Return Value real(kind=dp), (lenof_all_signs)


Contents

Source Code


Source Code

    function calc_amp_kp_hamil(parent_sign, prob, av_nspawn, HEl) result(child_sign)

        real(dp), intent(in) :: parent_sign(lenof_all_signs)
        real(dp), intent(in) :: prob
        real(dp), intent(in) :: av_nspawn
        real(dp), intent(in) :: HEl

        real(dp) :: child_sign(lenof_all_signs)
        real(dp) :: corrected_prob

        corrected_prob = prob * av_nspawn
        child_sign = HEl * parent_sign / corrected_prob

    end function calc_amp_kp_hamil