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: