元胞自动机遇到的 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] 纯文本查看 复制代码

!3-DIMENSIONAL CELLULAR AUTOMATA SIMULATION FOR GRAIN GROWTH
MODULE INITIAL
   IMPLICIT NONE
   INTEGER,PARAMETER :: IR=500, JR=500,KR=500, CASTEPMAX=2000, IQ=128
   INTEGER,PARAMETER :: STYLE_NEIGHBOR=26 !3D-Moore
   INTEGER,PARAMETER :: GRIDSIZE=2,ITERATION=100  !um
   INTEGER,DIMENSION(1:26):: STATE_N
   INTEGER,DIMENSION(1:6):: number
   INTEGER,DIMENSION(0:IR+1,0:JR+1,0:KR+1) :: STATE, STATE_1
   CHARACTER(LEN=60),DIMENSION(1:16)::FILENAMES
   REAL*8 :: AVERAGE6
END MODULE INITIAL
!************************************
PROGRAM GRAINGROWTH
   USE DFLIB
   USE MSFLIB
   USE INITIAL
   IMPLICIT NONE
!........time..........
   INTEGER:: DATE_TIME(8), HOUR, MINUTE, SECOND
   INTEGER:: TOTAL, NDIFF, MINUTESNEW
   INTEGER:: HOUR1, MINUTE1, SECOND1,TOTAL1
   INTEGER:: HOURS, MINUTES, SECONDS, TOTALS
!        
   INTEGER :: I,J,K,IX,IY,IZ,CASTEP, CASTEPOLD=iteration
   INTEGER :: nne,L 
   INTEGER,DIMENSION(26):: in,jn,kn 
   INTEGER,DIMENSION(l:6):: number1
   CHARACTER(LEN=60),DIMENSION(1:16)::filenames1
!.....................
   INTEGER:: COLOR
!.....................
   INTEGER :: NUM=0
   INTEGER :: N_INDEX, NR ! 1-26 neighbor index
   INTEGER :: NUM_OLD,NUM_NEW,E_OLD,E_NEW,DE ! energy
   REAL ::X,X1,VAL,VAL1 ! random number
   CHARACTER(len=80) :: Filesname
!******************************
!...........Calculate the time required for the program to run......

求大神们指点迷津！