元胞自动机遇到的 DFLib 问题

lbjcqu · 发表于 2016-8-2 23:07:59

一个元胞自动机的Fortran程序，对Fortran不是很熟悉，正在学习阶段。有一个网上看到的二次开发的程序源代码，用SF尝试编译。结果出现如下错误提示：==============================================================================
Generating Makefile... Okay
==============================================================================
Compiling ..\..\..\..\..\Bin-Jiang Lv\Desktop\ca-2-model.f90
..\..\..\..\..\Bin-Jiang Lv\Desktop\ca-2-model.f90:16.7:

USE DFLIB
1
Fatal Error: Can't open module file 'dflib.mod' for reading at (1): No such file or directory
Error(E42): Last command making (build\ca-2-model.o) returned a bad status
Error(E02): Make execution terminated
* Failed *
贴上程序的部分代码：

[Fortran] 纯文本查看 复制代码

01!3-DIMENSIONAL CELLULAR AUTOMATA SIMULATION FOR GRAIN GROWTH
02MODULE INITIAL
03   IMPLICIT NONE
04   INTEGER,PARAMETER :: IR=500, JR=500,KR=500, CASTEPMAX=2000, IQ=128
05   INTEGER,PARAMETER :: STYLE_NEIGHBOR=26 !3D-Moore
06   INTEGER,PARAMETER :: GRIDSIZE=2,ITERATION=100  !um
07   INTEGER,DIMENSION(1:26):: STATE_N
08   INTEGER,DIMENSION(1:6):: number
09   INTEGER,DIMENSION(0:IR+1,0:JR+1,0:KR+1) :: STATE, STATE_1
10   CHARACTER(LEN=60),DIMENSION(1:16)::FILENAMES
11   REAL*8 :: AVERAGE6
12END MODULE INITIAL
13!************************************
14PROGRAM GRAINGROWTH
15   USE DFLIB
16   USE MSFLIB
17   USE INITIAL
18   IMPLICIT NONE
19!........time..........
20   INTEGER:: DATE_TIME(8), HOUR, MINUTE, SECOND
21   INTEGER:: TOTAL, NDIFF, MINUTESNEW
22   INTEGER:: HOUR1, MINUTE1, SECOND1,TOTAL1
23   INTEGER:: HOURS, MINUTES, SECONDS, TOTALS
24!        
25   INTEGER :: I,J,K,IX,IY,IZ,CASTEP, CASTEPOLD=iteration
26   INTEGER :: nne,L 
27   INTEGER,DIMENSION(26):: in,jn,kn 
28   INTEGER,DIMENSION(l:6):: number1
29   CHARACTER(LEN=60),DIMENSION(1:16)::filenames1
30!.....................
31   INTEGER:: COLOR
32!.....................
33   INTEGER :: NUM=0
34   INTEGER :: N_INDEX, NR ! 1-26 neighbor index
35   INTEGER :: NUM_OLD,NUM_NEW,E_OLD,E_NEW,DE ! energy
36   REAL ::X,X1,VAL,VAL1 ! random number
37   CHARACTER(len=80) :: Filesname
38!******************************
39!...........Calculate the time required for the program to run......        