We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 92021fc commit 2f51bbdCopy full SHA for 2f51bbd
1 file changed
src/lib/lib9290/setcsll.f90
@@ -29,7 +29,7 @@ SUBROUTINE SETCSLL(NUNIT, NAME, NBLKIN, NBLOCK, NCFBLK, NCFTOT, IDBLK)
29
!-----------------------------------------------
30
INTEGER :: I, NCSF, IOS, IERR
31
LOGICAL :: FOUND
32
- CHARACTER :: STR*15, CH*2, LINE3*100
+ CHARACTER :: STR*15, CH*2, LINE3*200
33
34
! Locals
35
0 commit comments