Skip to content
Snippets Groups Projects
Commit 5ab09237 authored by Wiarda, Dorothea's avatar Wiarda, Dorothea
Browse files

Chase an overstepped bound

parent 208ff9c6
No related branches found
No related tags found
No related merge requests found
Hide whitespace changes
Inline Side-by-side
sammy/src/new/SetUExternalRMatrix_M.f90
+ 1
− 1
View file @ 5ab09237
...@@ -22,7 +22,7 @@ subroutine SetUExternalRMatrix_setParameterNumber(this, resData, covData, iflext ...@@ -22,7 +22,7 @@ subroutine SetUExternalRMatrix_setParameterNumber(this, resData, covData, iflext
class(CovarianceData)::covData class(CovarianceData)::covData
logical(C_BOOL)::initial logical(C_BOOL)::initial
integer::nrext, ntotc, nnrext integer::nrext, ntotc, nnrext
integer::Iflext(Nnrext,Ntotc,nrext) integer::Iflext(Nnrext,Ntotc,*)
integer::isp, ich, k integer::isp, ich, k
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment