utility_zdotu Function

public function utility_zdotu(a, b)

Arguments

Type IntentOptional Attributes Name
complex(kind=dp), intent(in) :: a(:)
complex(kind=dp), intent(in) :: b(:)

Return Value complex(kind=dp)


Called by

proc~~utility_zdotu~~CalledByGraph proc~utility_zdotu utility_zdotu proc~berry_get_sc_klist berry_get_sc_klist proc~berry_get_sc_klist->proc~utility_zdotu proc~berry_main berry_main proc~berry_main->proc~berry_get_sc_klist program~postw90 postw90 program~postw90->proc~berry_main

Source Code

  function utility_zdotu(a, b)
    complex(kind=dp), intent(in) :: a(:), b(:)
    complex(kind=dp) :: utility_zdotu
    utility_zdotu = sum(a*b)
    return
  end function utility_zdotu