Revision 5 src/valid.f90

valid.f90 (revision 5)
28 28
      LOGICAL,SAVE       :: Tall=.False., FValidFile, ValAll
29 29
      INTEGER(4) :: ios, i, j
30 30
      INTEGER(4), SAVE ::  NEntries
31
      LOGICAL, SAVE :: Debug=.TRUE.
31
      LOGICAL, SAVE :: Debug=.FALSE.
32 32

  
33 33
      IF (.not.TInit) THEN
34 34
         NEntries=0

Also available in: Unified diff