假定形状数组需要Fortran中的显式接口

我正试图为一个简单的程序编写代码，该程序首先要求输入一个数字n，然后创建一个nxn矩阵，其主对角线上有3s，上面有1s，下面有0s，向量（n）的不均匀位置有3，偶数位置有2。然后它必须包含一个子例程，不使用matmul（）将它们相乘

我在（1）处得到“matrmul”所需的错误消息显式接口：假定形状参数

---

我该如何解决这个问题？？谢谢

这里有很多关于堆栈溢出的示例，将向您展示如何创建显式接口。但是，由于在主程序中为所有数组分配内存，并将大小传递给子例程，因此只需在子例程中用n声明所有数组

subroutine matrmul(n, b, o, t)
  implicit none

  integer(4), intent(in) :: n
  integer(4) :: i, j
  integer, dimension(n), intent(in) :: b 
  integer, dimension(n,n),intent(in) :: o
  integer, dimension(n), intent(out) :: t

---

请将fortran标记添加到所有与fortran相关的问题中。除了DanSp。建议还请先搜索其他问题中的错误消息。

subroutine matrmul(n, b, o, t)
  implicit none

  integer(4), intent(in) :: n
  integer(4) :: i, j
  integer, dimension(n), intent(in) :: b 
  integer, dimension(n,n),intent(in) :: o
  integer, dimension(n), intent(out) :: t