qlj061001的博客

ALLOCATE语句分配FORTRAN动态数组方法

输出例子：  PROGRAM EX04220 INTEGER A A=1000 WRITE(*,100) A100 FORMAT(I4) END100 FORMA(I4) 是格式化输出，常用的格式化输出包括：Aw     字符串，w个字符来输出；            Iw[.m] w个宽度输出整数，最少输出m个数字；Ew.d  用指...

1、数值赋初值操作： 例子：INTEGER A(5)DATA A /1,2,3,4,5/ !fortran77 通常用法或者INTEGER A(5)INTEGER IDATA (A(I),I=2,4) /2,3,4/ !用隐含式的循环将 A(2)=2,A(3)=3,A(4)=4赋值。下面用FORTRAN95的用法赋值，例子如下：integer::a(5)=(/1...

1、子例程subroutine的使用格式 subroutine sub1() ...... retrunend subroutine sub1()注意： 最后一个命令通常为return，表示返回到主程序调用它的位置，子例程可以在FORTRAN90中实现自我调用，在FORTRAN77中则不被允许；另外子例程拥有独立的变量和独立的“行代码”。在传递参数的时候应用的是“地址调用”，...

1、数组参数在传递数组参数时，实质传递的是某个内存地址，因此可以利用这一点使用很多技巧program ex0816implicit none integer::a(5)=(/1,2,3,4,5/) call ShowOne(a) !输出结果为1，即数组的第一个元素内存地址的内容, call ShoeArray3(a) !输出结果为1,2,3 ，即输出3个元素的数组，第一个...

1、文件读写操作，对于用户来讲按照文件类型可以分为文本文件和二进制文件两种，在使用OPEN或者WRITE函数进行读写时首先要明确的是要操作的文件的类型，另外FORTRAN可以按顺序读写，同样可以直接读写，直接读写类似于我们用CD机听音乐时可以直接跳到我们要听的部分。读写函数一OPEN函数为例：open(unit=fileid, file=filename, access="direct",recl...

1、同名函数的重载类似于C语言的函数重载，FORTRAN90中支持自定义虚拟函数名称： 根据输入参数的不同以及数目不同来选择要调用函数，这些功能通过在module中使用interface来实现。module MA implicit none interface show ! 虚拟函数名称show module procedure show_in...

在说动态链接库DLL之前，我们要知道什么是库，库有哪些作用，以及如何判别何时用库？首先，我们要说明一般编译器的工作步骤，我们用fortran编写程序的一般步骤为：写代码阶段->  把程序转为目标文件（*.obj）-> 将得到的一个或多个*.obj文件链接成*.exe  ->运行可执行文件*.exe得到结果 或者调试 。例如 用G95编译器 编译2个*f90文件 gdemo3.f9...