Scientific Graphics using Fortran

—————————————————————————-

I recommend the PSPLOT package written by Mr Kevin Kohler
(http://www.nova.edu/cwis/oceanography/psplot.html)
The ready-to-use binary form of the library is available from:

http://www.geocities.com/Athens/Olympus/5564/

The PSPLOT library is free to use for non-commercial purposes.

—————————————————————————-

PSPLOT  http://www.nova.edu/cwis/oceanography/psplot.html
PostScript for Technical Drawings
A free Fortran-callable PostScript Plotting Library
Written by: Kevin E. Kohler

[Introduction]
[Plotting Basics]
[Subroutines]
[Output Example: Black and White]
[Output Example: Color]
[Obtaining PSPLOT]
Adobe PDF version of PSPLOT User’s Manual (324Kb) (下载使用手册,大小是324Kb) (courtesy of Rob Stewart)

画曲线:

URPOSE: CURVE draws a curve between two points, given the beginning and ending curve slopes.

SYNTAX: CALL CURVE (X1, Y1, X2, Y2, X3, Y3, X4, Y4, CONTIN)

ARGUMENTS:

X1,Y1 X,Y coordinates of the beginning of the curve.

X2,Y2 X, Y coordinates specifying the beginning curve slope. The initial slope of the curve is given by (Y2-Y1)/(X2-X1).

X3,Y3 X,Y coordinates specifying the ending curve slope. The end slope of the curve is given by (Y4-Y3)/(X4-X3).

X4,Y4 X,Y coordinates of the endpoint of the curve.

CONTIN Logical value. If CONTIN=.false. then the curve drawn starts a newpath; otherwise, the curve is appended to the current path.

Note: The curve produced by CURVE is not automatically stroked.

For example:

我修改了一点G77,安装非常简单,可以任意安装,随你喜好!

请使用这个版本的G77,下载地址:G77.rar

本程序由TAHO修改,可以放在任何盘的任何文件夹里,包括U盘,不再局限于C盘,更支持中文文件夹和名字有空格的文件夹,使用非常方便。
对于学习计算物理的同学,把它放在U盘里使用也行的!

安装方法:

1. 下载压缩包G77.rar,右键点击G77.rar,选择“解压到当前文件夹”,

2. 你会看见一个名叫G77的文件夹出现了,打开这个文件夹

3. 双击打开start.bat便可以使用了(注:windows7用户如果那样打开不行,请右键选择“以管理员身份运行”)。

4. 每一次使用G77都要运行start.bat,你可以把start.bat重新命名,只要保留后缀名仍为bat便好,start改成什么都可以,不影响使用,比如命名为“运行.bat”。注意,使用时要把你的程序复制到G77文件夹里面哟~!

G77的一些简单使用方法:

1.最简单的编译方法:
G77 MYTEST1.F

2.要生成名字不是a.exe,而是自己想起的名字,比如GOOD.EXE的程序,只需要加上“-o”,后面写上GOOD.EXE便可,像这样:
G77 MYTEST1.F -o GOOD.EXE

3.纠错编译(如果程序本身就有错误,这个办法可以检查出来,编译不会通过的,会给出警告信息。即编译的时候,只要加上“-Wall”就可以了),就像这样:
G77 -Wall MYTEST1.F
4.其他用法:(不翻译了)

The g77 compiler has a large number of other command switches – a few of
the most useful are shown here:

-c Compile-only: produces .OBJ files.
-ffree-form Selects free-format source code
-fpedantic Warns of non-portable/non-standard code.
-fno-automatic Static storage for all variables, like universal SAVE
-fno-backslash Interprets “” as a normal character in strings
-fvxt Use VAX Fortran interpretation of certain syntax
-g Produces debugging information.
-Idirectory Specifies directory to search for INCLUDE files
-O Optimise code generation
-Wimplicit Warns of any names with no explicit data type
-Wuninitialised Warns of some cases of unset variables (if -O also set).
-Wall Warns of both of above cases.

献给丹儿
BY TAHO
2012.11.22
taho.cc
tahoroom.sinaapp.com

本文链接:http://tahoroom.sinaapp.com/?p=2215 欢迎分享!

查看全文

MATLAB与C++、G77的混合编程

《深入浅出MATLAB 7.X混合编程》 董维国 编著 电子书下载  请查看第四章内容

下面内容属于转载:来自 http://www.legalsoft.com.cn/fortran/fortran77.aspx

不过这篇文章更像是C#语言的广告,也许C#真有他说的那么好用,谁知道呢。

FORTRAN77语法概述/简单教程(G77)

FORTRAN是世界上最早出现的高级编程语言,是工程界最常用的编程语言,它在科学计算中(如航空航天、地质勘探、天气预报和建筑工程等领域)发挥着极其重要的作用。经过40多年的发展,伴随着FORTRAN语言多次版本的更新及相应开发系统的出现,其功能不断完善,最新版本的开发系统几乎具备了VC、VB的所有特点,如图形界面编程、数据库等。目前,工科院校开设的计算机编程语言课首选仍然是FORTRAN :<

说实话,从科技发展的趋势来说这不是好事。您可以设想一下,如果需要用鹅毛笔抄写大量的古籍是什么感受!
强烈建议阅读《发掘C#特性赋予科学计算项目以威力

1 FORTRAN77四则运算符

+ – * / ** (其中**表示乘方)
在表达式中按优先级次序由低到高为: +或-→*或/→**→函数→()

2 FORTRAN77变量类型

2.1 隐含约定:I-N规则

凡是以字母I,J,K,L,M,N六个字母开头的,即认为是整型变量,其它为实型变量。

2.2 用类型说明语句确定变量类型:可以改变I-N规则

INTEGER 整型
REAL 实型
DOUBLE PRECISION 双精度实型
COMPLEX 复型,赋值形式为(实部,虚部),如D=(8.76E+0.5,-67.8E-3),C=(3.0,6.3),如果含表达式则用CMPLX,如C=CMPLX(3.0*A,6.0+B)
LOGICAL 逻辑型,逻辑常量有“T”和“F”,“T”表示“.TRUE.”,“F”表示“.FALSE.”
CHARACTER*N 字符型,N为字符串长度,可以在变量名称后重新指定长度,如CHARACTER*8 STR1,STR2*10 ,赋值形式为STR2=’I”M A BOY.’

2.3 用IMPLICIT语句将某一字母开头的全部变量指定为所需类型

如 IMPLICIT REAL (I,J)
三种定义的优先级别由低到高顺序为:I-N规则→IMPLICIT语句→类型说明语句,因此,在程序中IMPLICIT语句应放在类型说明语句之前。

查看全文