favg_x Function

private function favg_x(fl, fr)

FIXME : Add documentation

Arguments

Type IntentOptional Attributes Name
complex, intent(in) :: fl
complex, intent(in) :: fr

Return Value complex


Contents

Source Code


Source Code

  complex function favg_x (fl, fr)
    complex, intent (in) :: fl, fr
    favg_x = 0.5*(fl+fr)
  end function favg_x