File: usage.fc3

package info (click to toggle)
ftnchek 2.11.2-2
  • links: PTS
  • area: main
  • in suites: potato
  • size: 5,392 kB
  • ctags: 2,790
  • sloc: ansic: 21,570; fortran: 2,921; yacc: 2,794; sh: 1,623; makefile: 693; lisp: 264; awk: 163
file content (67 lines) | stat: -rw-r--r-- 2,292 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67

FTNCHEK Version 2.11 July 1999

File usage.f:
     11      $ 		(9,9,100)
             ^
Possibly misleading appearance near line 11 col 6 file usage.f: Continuation
 follows comment or blank line
     23 	parameter (Pi = 3.14159265358979D0)
                              ^
Warning near line 23 col 23 file usage.f:  dble const truncated to real PI
     50 		www = 4.7 + (Pi * 2)**8
                            ^
Warning near line 50 col 21 file usage.f:  real expr truncated to intg WWW
     60 	dbl1 = 1.2345
                     ^
Warning near line 60 col 14 file usage.f:  real const promoted to dble DBL1 :
 may not give desired precision
Warning in module YACCTEST file usage.f:
   Variables declared but never referenced:
    COMPL1             COMPL2               DBL2            PROGRAM         

   Variables set but never used:
      A123                END                IFA                WWW         

   Variables used before set:
     IUNIT              PAUSE               SAVE               STOP         

   Variables may be used before set:
      DBL1         

     75 	if( beta ) xray = 1.0D0
                                ^
Warning near line 75 col 25 file usage.f:  dble const truncated to intg XRAY
Warning in module XRAY file usage.f:
   Variables declared but never referenced:
     GAMMA*        
  * Dummy argument

     81 	if((x-1.0)**(sqrt(2.0))/(5/4+com6) .gt. com3) then
                                            ^
Warning near line 81 col 37 file usage.f: integer quotient expr converted to
 real
     87 	com4(com2+com6) = com4(xray)
                     ^
Warning near line 87 col 14 file usage.f: subscript is not integer
                                       ^
Warning near line 87 col 32 file usage.f: subscript is not integer
Warning in module HOME file usage.f:
   Variables used before set:
      COM2         


 0 syntax errors detected in file usage.f
 14 warnings issued in file usage.f

Common block BLK1:
  Elements used but never set: COM3 COM6
Common block BLK2: unused
Common block %BLANK: unused
Common block BLK3: unused
Common block BLK4:
  Elements set but never used: all
Subprogram XRAY never invoked
    defined in module XRAY line 70 file usage.f
Subprogram HOME never invoked
    defined in module HOME line 78 file usage.f