← Back to branch summary

~ubuntu-branches/ubuntu/edgy/ftnchek/edgy

« back to all changes in this revision

Viewing changes to test/Okay/t208w.dc1

  • Committer: Bazaar Package Importer
  • Author(s): Mark Brown
  • Date: 2002-03-28 10:49:50 UTC
  • Revision ID: james.westby@ubuntu.com-20020328104950-kssfxlf8u0qsfelr
Tags: upstream-3.1.2
Import upstream version 3.1.2

Show diffs side-by-side

added added

removed removed

Lines of Context:
test/Okay/t208w.dc1
 
1
C====>Begin Module %MAIN                  File t208w.f                  
 
2
C---->Makedcls Options: Undeclared variables                            
 
3
C
 
4
C     Parameter variables
 
5
C
 
6
      INTEGER             L2NG
 
7
      PARAMETER           (L2NG = 6)
 
8
      INTEGER             NG
 
9
      PARAMETER           (NG = 2**L2NG)
 
10
      INTEGER             NB
 
11
      PARAMETER           (NB = NG+2)
 
12
      INTEGER             NGM1
 
13
      PARAMETER           (NGM1 = NG-1)
 
14
      INTEGER             NBP1
 
15
      PARAMETER           (NBP1 = NB+1)
 
16
C
 
17
C====>End Module   %MAIN                  File t208w.f