|
1234567891011121314 |
- !COMPILER-GENERATED INTERFACE MODULE: Mon Jan 30 12:46:38 2023
- ! This source file is for reference only and may not completely
- ! represent the generated interface used by the compiler.
- MODULE SOLVE_LINEAR_EQUATIONS__genmod
- INTERFACE
- SUBROUTINE SOLVE_LINEAR_EQUATIONS(A,X,B,ERROR,DIM)
- INTEGER(KIND=4), INTENT(IN) :: DIM
- REAL(KIND=8), INTENT(IN) :: A(DIM,DIM)
- REAL(KIND=4), INTENT(OUT) :: X(DIM)
- REAL(KIND=8), INTENT(IN) :: B(DIM)
- LOGICAL(KIND=4), INTENT(OUT) :: ERROR
- END SUBROUTINE SOLVE_LINEAR_EQUATIONS
- END INTERFACE
- END MODULE SOLVE_LINEAR_EQUATIONS__genmod
|