C --------- GEOMETRICAL BOUNDARY CONDITIONS IN STRESS-STRAIN
C           ANALYSI
C             NBOUND : NUMBER OF NODAL POINTS WITH KNOWN
C                      DISPLACEMENT IN EACH COMPONENT
C             NPDIS : NODAL POINT WITH KNOWN DISPLACEMENT --------------
C
      READ(group1,*) (NBOUND(I),(NPDIS(I,J),J=1,NBOUND(I)),I=1,3)
    write (6,*) (NBOUND(I),(NPDIS(I,J),J=1,NBOUND(I)),I=1,3)
    stop
      NBOUND(1)=1
    NBOUND(2)=2
    NBOUND(3)=3
    DO 90 I=1,NELEM
      DO 90 J=1,2
90    NPDIS(J,I)=3
    
    
    我不知道这段程序究竟要读group1中的什么，求救啊！！我论文还没做好，很快就要毕业啦！慌乱中！希望各位兄弟能够救救我啊！
我的QQ：63995221
酬谢啊！！