Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Bug, parameter check in ab13bd #198

Closed
KybernetikJo opened this issue Jul 19, 2023 · 1 comment
Closed

Bug, parameter check in ab13bd #198

KybernetikJo opened this issue Jul 19, 2023 · 1 comment

Comments

@KybernetikJo
Copy link
Contributor

KybernetikJo commented Jul 19, 2023

Parameter check of m and p is wrong.

function ab13bd(dico,jobn,n,m,p,a,lda,b,ldb,c,ldc,d,ldd,nq,tol,dwork,ldwork,iwarn,info) ! in AB13BD.f
    character intent(in) :: dico
    character intent(in) :: jobn
    integer check(n>=0) :: n
    integer check(n>=0) :: m
    integer check(n>=0) :: p
    ...

Fix

function ab13bd(dico,jobn,n,m,p,a,lda,b,ldb,c,ldc,d,ldd,nq,tol,dwork,ldwork,iwarn,info) ! in AB13BD.f
    character intent(in) :: dico
    character intent(in) :: jobn
    integer check(n>=0) :: n
    integer check(m>=0) :: m
    integer check(p>=0) :: p
    ...
@bnavigator
Copy link
Collaborator

Closed by #200

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
None yet
Projects
None yet
Development

No branches or pull requests

2 participants