9楼: Originally posted by wuluo1213 at 2011-11-01 17:27:04:
你好，我已经按照你给的那个要求改过了，但是结果还是一样的啊？奇怪啦。请问你用的是那个版本啊？我用的是Microsoft Developer Studio，还是不会出现你给的那种信息，我传了文件，里面是两本书上的源程序，能否 ...

rigid.for:179.4:

3000    format(5i5)                                                     
    1
Warning: Label 3000 at (1) defined but not used
rigid.for:525.4:

5011    format(i7,9x,2f14.4,f17.3)                                      
    1
Warning: Label 5011 at (1) defined but not used
rigid.for:550.72:

        character*3 step                                                
                                                                        1
Warning: Line truncated at (1)
rigid.for:711.3:

200     continue                                                        
   1
Warning: Label 200 at (1) defined but not used
rigid.for:1044.4:

1008    format('ABC')                                                   
    1
Warning: Label 1008 at (1) defined but not used
rigid.for:1276.3:

100     continue                                                        
   1
Warning: Label 100 at (1) defined but not used
rigid.for:1320.4:

2000    format(2i6,5f12.8)                                             
    1
Warning: Label 2000 at (1) defined but not used
rigid.for:1434.2:

75      write(4,2000)i,no,r(no),rn,z(no),zn,alp(i)                     
  1
Warning: Label 75 at (1) defined but not used
rigid.for:1764.51:

        r=h(1)*rr(1)+h(2)*rr(2)+h(3)*rr(3)+h(4)*rr(4)                  
                                                   1
Warning: Array reference at (1) is out of bounds (4 > 1) in dimension 1
rigid.for:1764.40:

        r=h(1)*rr(1)+h(2)*rr(2)+h(3)*rr(3)+h(4)*rr(4)                  
                                        1
Warning: Array reference at (1) is out of bounds (3 > 1) in dimension 1
rigid.for:1764.29:

        r=h(1)*rr(1)+h(2)*rr(2)+h(3)*rr(3)+h(4)*rr(4)                  
                             1
Warning: Array reference at (1) is out of bounds (2 > 1) in dimension 1
rigid.for:1872.72:

        SUBROUTINE MODIFY(code,uz,a,b,numnp,neq,mband,niter)            
                                                                        1
Warning: Line truncated at (1)
rigid.for:2120.4:

1110    format('layer'/,'new'/,i1,/'color'/,i1,/i1,/'set'/,i1)         
    1
Warning: Label 1110 at (1) defined but not used
rigid.for: In function 'touch':
rigid.for:384:0: warning: 'x2' may be used uninitialized in this function
rigid.for:385:0: warning: 'y1' may be used uninitialized in this function
rigid.for:386:0: warning: 'y2' may be used uninitialized in this function
rigid.for: In function 'writer':
rigid.for:865:0: warning: 'n' may be used uninitialized in this function
rigid.for: In function 'graphs':
rigid.for:964:0: warning: 'nunism' may be used uninitialized in this function
rigid.for: In function 'grarcl':
rigid.for:1030:0: warning: 'j' may be used uninitialized in this function
rigid.for: In function 'mintm':
rigid.for:1246:0: warning: 'u1' may be used uninitialized in this function
rigid.for: In function 'element':
rigid.for:2201:0: warning: 'nuni' may be used uninitialized in this function
C:\Temp\cclFXeHC.o:rigid.for:(.text+0x9166): undefined reference to `alp_'
C:\Temp\cclFXeHC.o:rigid.for:(.text+0x918f): undefined reference to `alp_'
collect2: ld returned 1 exit status