回 帖 发 新 帖 刷新版面

主题:开个贴回答Fotran 的问题

开个贴试着回答Fortran的问题。有问题的请跟贴。
有两种问题不想回答:
1. Fortran文件读取方面的问题。
2. Fortran程序调试或者找程序中的错误。

回复列表 (共83个回复)

31 楼

回30楼:这种功能在delphi中用过,用的是Timer控件。
fortran 中可以用sleep函数来模拟,见下面的例子:
WRITE(*,*)i; 可以换成需要的函数。

SUBROUTINE sleepFun()
USE IFPORT
INTEGER  sleepTime ;

sleepTime = 10  ! sleep 10s;
DO i =1,100
WRITE(*,*)i;
CALL SLEEP(sleepTime);
ENDDO

32 楼

谢谢trimtrim

请教:
linux下面 cpp -D 定义宏 这个功能很好用 

我想请问vs2008里面如何定义宏啊 
比如说定义宏变量WDOS
源代码中#if defined (WDOS)
           print*,'WDOS'
       #else
           print*,'no WDOS'
      #endif
谢谢

33 楼

回32楼:
打开fpp选项:
Project-> Properties->Fortran->Preprocessor->Preprocess Source File

34 楼

[quote]回12楼:
我试过Fotran和pascal,Fotran和c的。可以借鉴一下,据说有两种方法,一种是库方法,一种是com方法。
我用的是库方法,把函数打包成库,并且加上函数的库输出接口,具体可以参考帮助中的Programming with Mixed Languages部分。
至于com方法,没有用过。[/quote]

还有一种 就是以数据文件交换

35 楼


F=if(F<0,0,F)是什么语句?!在fortran里面有这种使用的吗?!能否请教一下

36 楼

回35楼:我没见过这样的写法,不懂。

37 楼


(菜鸟提问)大侠,我调用lapack包解一个三对角矩阵的本征值问题,用的是zheev函数,可是返回的结果前几个本征值显示的都显示“******”,请问有没有可能是本征值过大造成的?
谢谢了

38 楼

回37楼:我估计是你输出格式不对导致的。
try 默认格式输出
write(*,*) results

39 楼


哦,行了 多谢楼主

40 楼

为什么绿色版的fortran无法生成.opt和.dsw的文件?
应该如何生成?

谢谢了

我来回复

您尚未登录,请登录后再回复。点此登录或注册