mat_mat_rel_ATB Subroutine

private pure subroutine mat_mat_rel_ATB(A, B, C, option)

Arguments

Type IntentOptional Attributes Name
real(kind=rk), intent(in), contiguous :: A(:,:)
real(kind=rk), intent(in), contiguous :: B(:,:)
real(kind=rk), intent(inout), contiguous :: C(:,:)
character(len=*), intent(in), optional :: option

Calls

proc~~mat_mat_rel_atb~~CallsGraph proc~mat_mat_rel_atb mat_mat_rel_ATB proc~mat_mat_rel_atb_opt mat_mat_rel_ATB_opt proc~mat_mat_rel_atb->proc~mat_mat_rel_atb_opt proc~mm_atb_1 mm_ATB_1 proc~mat_mat_rel_atb_opt->proc~mm_atb_1 proc~mm_atb_10 mm_ATB_10 proc~mat_mat_rel_atb_opt->proc~mm_atb_10 proc~mm_atb_11 mm_ATB_11 proc~mat_mat_rel_atb_opt->proc~mm_atb_11 proc~mm_atb_12 mm_ATB_12 proc~mat_mat_rel_atb_opt->proc~mm_atb_12 proc~mm_atb_13 mm_ATB_13 proc~mat_mat_rel_atb_opt->proc~mm_atb_13 proc~mm_atb_2 mm_ATB_2 proc~mat_mat_rel_atb_opt->proc~mm_atb_2 proc~mm_atb_3 mm_ATB_3 proc~mat_mat_rel_atb_opt->proc~mm_atb_3 proc~mm_atb_4 mm_ATB_4 proc~mat_mat_rel_atb_opt->proc~mm_atb_4 proc~mm_atb_5 mm_ATB_5 proc~mat_mat_rel_atb_opt->proc~mm_atb_5 proc~mm_atb_6 mm_ATB_6 proc~mat_mat_rel_atb_opt->proc~mm_atb_6 proc~mm_atb_7 mm_ATB_7 proc~mat_mat_rel_atb_opt->proc~mm_atb_7 proc~mm_atb_8 mm_ATB_8 proc~mat_mat_rel_atb_opt->proc~mm_atb_8 proc~mm_atb_9 mm_ATB_9 proc~mat_mat_rel_atb_opt->proc~mm_atb_9 interface~gemm gemm proc~mm_atb_2->interface~gemm

Called by

proc~~mat_mat_rel_atb~~CalledByGraph proc~mat_mat_rel_atb mat_mat_rel_ATB proc~mat_mat_rel mat_mat_rel proc~mat_mat_rel->proc~mat_mat_rel_atb interface~matmul matmul interface~matmul->proc~mat_mat_rel

Source Code

   pure subroutine mat_mat_rel_ATB(A, B, C, option)
      real(rk), intent(in), contiguous :: A(:,:), B(:,:)
      real(rk), intent(inout), contiguous :: C(:,:)
      character(*), intent(in), optional :: option

      if (present(option)) then
         call mat_mat_rel_ATB_opt(A, B, C, option)
      else
         call mat_mat_rel_ATB_opt(A, B, C, 'm2')
      end if
   end subroutine mat_mat_rel_ATB