outerdiff Function

public function outerdiff(a, b) result(outerdiff_i)

Arguments

Type IntentOptional Attributes Name
integer, intent(in), dimension(:) :: a
integer, intent(in), dimension(:) :: b

Return Value integer, dimension(size(a),size(b))


Called by

proc~~outerdiff~2~~CalledByGraph proc~outerdiff~2 outerdiff proc~lower_triangle lower_triangle proc~lower_triangle->proc~outerdiff~2 proc~broyden1~2 broyden1 proc~broyden1~2->proc~lower_triangle

Source Code

  function outerdiff(a,b) result(outerdiff_i)
    integer, dimension(:), intent(in) :: a,b
    integer, dimension(size(a),size(b)) :: outerdiff_i
    outerdiff_i = spread(a,dim=2,ncopies=size(b)) - spread(b,dim=1,ncopies=size(a))
  end function outerdiff