I did some changes in the code, but this time a different error occurred:
error: "Segmentation fault (core dumped)"
The code is:
----------------------------
subroutine dyad(A, B, C)
real, intent(in) :: A(:)
real, intent(in) :: B(:)
real, dimension(size(A),size(B)), intent(out) :: C
integer ...