simple program for c++ learners which can be helpfull hashing code

这是一个采用平面四边形八节点等参单元的平面有限元分析程序。 PROGRAM PLANEFEM IMPLICIT REAL*8(A-H,O-Z) CHARACTER*80 LINECHAR,NEWLINECHAR COMMON A(30000),L(4000) COMMON /SOL/NPOIN,NELEM,NTYPE,NMATS OPEN(5,FILE= FEMDATA ,STATUS= OLD ) OPEN(6,FILE= FEMOUT ,STATU

PROGRAM PLANEFEM IMPLICIT REAL*8(A-H,O-Z) CHARACTER*80 LINECHAR,NEWLINECHAR COMMON A(30000),L(4000) COMMON /SOL/NPOIN,NELEM,NTYPE,NMATS OPEN(5,FILE= FEMDATA ,STATUS= OLD ) OPEN(6,FILE= FEMOUT ,STATUS= UNKNOWN ) C 以下进行的是从数据文件FEMDAT