搜索资源列表
j
- C *** **** PROGRAM GENEIGEN *** ** IMPLICIT DOUBLE PRECISION (A-H,O-Z) DIMENSION S(100,100),GM(100,100),NORD(100),D(100),B(99) CHARACTER*16 FILE1,FILE2 CHARACTER*81 DUMMY PRINT *, ********************************************
i
- C *** **** PROGRAM GENEIGEN *** ** IMPLICIT DOUBLE PRECISION (A-H,O-Z) DIMENSION S(100,100),GM(100,100),NORD(100),D(100),B(99) CHARACTER*16 FILE1,FILE2 CHARACTER*81 DUMMY PRINT *, ********************************************