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
|
FTNCHEK Version 3.1 May 2001
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 3.14159265358979D0
truncated to real PI
50 www = 4.7 + (Pi * 2)**8
^
Warning near line 50 col 21 file usage.f: real expr 4.7+(PI*2)**8 truncated to
intg WWW
60 dbl1 = 1.2345
^
Warning near line 60 col 14 file usage.f: real const 1.2345 promoted to dble
DBL1: may not give desired precision
75 if( beta ) xray = 1.0D0
^
Warning near line 75 col 25 file usage.f: dble const 1.0D0 truncated to intg
XRAY
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 5/4 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
0 syntax errors detected in file usage.f
8 warnings issued in file usage.f
|
