Fortran Coder

查看: 11117|回复: 4

[编译器] 元胞自动机遇到的 DFLib 问题

[复制链接]

4

帖子

2

主题

0

精华

新人

F 币
25 元
贡献
14 点
发表于 2016-8-2 23:07:59 | 显示全部楼层 |阅读模式
2F 币
一个元胞自动机的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......        

求大神们指点迷津!

最佳答案

查看完整内容

dflib 是 cvf 或 ivf 提供的扩展库。 如果你使用 gfortran 编译,就会出现不支持。 类似的还有 msflib 建议删掉这些库的使用,如果有非标准的函数,尝试用其他方式来实现。

953

帖子

0

主题

0

精华

大师

F 币
180 元
贡献
73 点

规矩勋章元老勋章新人勋章水王勋章热心勋章

QQ
发表于 2016-8-2 23:08:00 | 显示全部楼层
dflib  是 cvf 或 ivf 提供的扩展库。
如果你使用 gfortran 编译,就会出现不支持。

类似的还有 msflib

建议删掉这些库的使用,如果有非标准的函数,尝试用其他方式来实现。
回复

使用道具 举报

490

帖子

4

主题

0

精华

大宗师

F 币
3298 元
贡献
1948 点

水王勋章元老勋章热心勋章

发表于 2016-8-3 08:06:18 | 显示全部楼层
错误提示一目了然:缺少DFLIB库文件
btw,本站的教学视频好好看三遍,彭国伦的书好好看三遍,实在坚持不下去,出门左转投奔MATLAB吧
回复

使用道具 举报

4

帖子

2

主题

0

精华

新人

F 币
25 元
贡献
14 点
 楼主| 发表于 2016-8-3 18:28:29 | 显示全部楼层
pasuka 发表于 2016-8-3 08:06
错误提示一目了然:缺少DFLIB库文件
btw,本站的教学视频好好看三遍,彭国伦的书好好看三遍,实在坚持不下 ...

好的,我一定好好看,前辈!
回复

使用道具 举报

4

帖子

2

主题

0

精华

新人

F 币
25 元
贡献
14 点
 楼主| 发表于 2016-8-3 18:28:48 | 显示全部楼层
vvt 发表于 2016-8-3 12:55
dflib  是 cvf 或 ivf 提供的扩展库。
如果你使用 gfortran 编译,就会出现不支持。

慢慢学,慢慢试试看!谢谢
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-3-28 23:54

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表