8000 Make ab13bd array arguments `intent(in,out,copy)` · python-control/Slycot@c426935 · GitHub
[go: up one dir, main page]

Skip to content

Commit c426935

Browse files
committed
Make ab13bd array arguments intent(in,out,copy)
1 parent 4699356 commit c426935

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

slycot/src/analysis.pyf

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -307,13 +307,13 @@ function ab13bd(dico,jobn,n,m,p,a,lda,b,ldb,c,ldc,d,ldd,nq,tol,dwork,ldwork,iwar
307307
integer check(n>=0) :: n
308308
integer check(n>=0) :: m
309309
integer check(n>=0) :: p
310-
double precision dimension(n,n),depend(n) :: a
310+
double precision intent(in,out,copy),dimension(n,n),depend(n) :: a
311311
integer intent(hide),depend(a) :: lda = shape(a,0)
312-
double precision dimension(n,m),depend(n,m) :: b
312+
double precision intent(in,out,copy),dimension(n,m),depend(n,m) :: b
313313
integer intent(hide),depend(b) :: ldb = shape(b,0)
314-
double precision dimension(p,n),depend(n,p) :: c
314+
double precision intent(in,out,copy),dimension(p,n),depend(n,p) :: c
315315
integer intent(hide),depend(c) :: ldc = shape(c,0)
316-
double precision dimension(p,m),depend(m,p) :: d
316+
double precision intent(in,out,copy),dimension(p,m),depend(m,p) :: d
317317
integer intent(hide),depend(d) :: ldd = shape(d,0)
318318
integer intent(out) :: nq
319319
double precision :: tol

0 commit comments

Comments
 (0)
0