D****y
发帖数: 2207 | 1 指针是Fortran 90才引入的Fortran77里只有common block没有指针，写过Fortran77编
译器的飘过。
Fortran90里的指针其实也是基于common block扩展出来的，所以有限制。 |
|
h***o
发帖数: 539 | 2 谢谢。如果我只是想程序写得更漂亮，我就会用C
但有时侯不得不照顾老板，老板花了不少银子培养我，我也不能走得时候
给老板留一堆她看不懂的code吧。所以还是fortran77吧
老是老点，但通用的说。hoho
而且fortran77好象也能modular programming...:)
thank you anyway |
|
a******s
发帖数: 232 | 3 就是阿，这个语法错我总觉得是最低级的错，又不是啥大程序，有时候不好定位，
这个程序，多看几眼就出来了，我就不说了。
fortran77只是个规范，不会变的，但是现在我相信所有的编译器都支持
do..enddo，但是也不说明fortran77支持。如果你用ifc7.1的话，如果
用do 10 ...10 continue的话，编译时候不带-w的话，还提示语法过时呢，
现在ifort都给省了，编译缺省级别不同了。
有时候还是do 10这样好，看着清晰，要不enddo太多了，分不清end是哪儿个do了。:) |
|
g****y
发帖数: 199 | 4 ☆─────────────────────────────────────☆
walp (暂无) 于 (Thu Jul 10 01:05:02 2008) 提到:
用下面的语句生成一个30×30的矩阵，写成matrixA.dat文件
% generate a matrix
A = delsq(numgrid('C',8));
[nrow,ncol]=size(A);
% write the matrix to a .dat file
fid=fopen('matrixA.dat','w');
for i=1:nrow
for j=1:ncol
count=fwrite(fid, A(i,j),'double');
end
end
fclose('all');
这样一个简单的文件怎么在fortran77里读进来？我试了好多次open和read的参数都不
行，错误好几种，或者"formatted I/O on unformatted unit", 或者"record is too
long" 等等。
我不太熟悉fortran77的输入输出，自己试 |
|
x*****7
发帖数: 7326 | 5 作为一个80年代学BASICA，90年代学FORTRAN77/90, C/C++，00年代学JAVA/J2EE的学生
，我的看法是：
小学生和初中生学VB比较好，直观，不用太注重OOP，而高中生学JAVA直接上OOP容易。
然后自然就可以转到C++/C#。我这里美国第一高中的JAVA是必修课，然后大部分学生都
自学了C++/C#，连不喜欢计算机的女生都可以和我讨论编程。 |
|
xt
发帖数: 17532 | 6 有没有用过卡片的出来报到一下？我当年学过Fortran77，
超级恶心的语言。 |
|
xt
发帖数: 17532 | 7 COBOL比FORTRAN早，但是还算灵活，虽然比较罗嗦。
FORTRAN77最大的问题是不支持动态数据结构，因为
FORTRAN是一个静态语言，所有东西都静态。这个在
Fortran90上改了。 |
|
x*****8
发帖数: 10683 | 8 本虾当TA的时候就已经没落了。
本虾擅长物理，却学了生化，浪费了10年光阴，仅发表第一作者文章一篇，会议摘要两
份，半途而废。
后来本虾改学Java和C++（在那以前本虾初中学过BASICA，本科学过FORTRAN77和C，但
一直没能学成好的程序员），只是半路出家，未得其中精粹，加之赖床，经常迟到，对
你们教学实在是误人子弟，在此深感歉意！ |
|
xt
发帖数: 17532 | 9 动手最重要，现在电脑那么便宜，而且IDE也这么先进而且免费，
弄个Eclipse下来，然后随便弄本书练练手，手上有了感觉再
往下学。我当年C, C++, Java都是自己看书学的，在那以前只
用过BASIC和FORTRAN77，F77是相当土的语言 |
|
xt
发帖数: 17532 | 10 这种 计算软件太多了，就是没有，写个东西算算也不难，以前又不是
没有。早在Fortran77时代这种库就是大把大把了 |
|
d********0
发帖数: 5142 | 11 你这阅读理解，还有历史知识，都不够啊。
计算机和互联网，是两回事。
计算机真正的功效是计算效率本身，特别是并行机，基于此基础上的软体，比如算法，
软件，还有数据库，那都不是90年代以后才出品的。
你可以看看unix的历史，C语言历史，比如Fortran77指的就是1977年的Fortran版本。
这跟90年代以后谁报考什么志愿没啥关系啊。80年代就流行的。
但互联网是克林顿执政时代最杰出的产物。
Information superhighway
From Wikipedia, the free encyclopedia
Jump to: navigation, search
The information superhighway or infobahn[1][2] was a popular term used
through the 1990s to refer to digital communication systems and the internet
telecommunications network. It is associated with United Stat |
|
w***s
发帖数: 15642 | 12 还有更古老的呢。。。Fortran77的。。。 |
|
b*s
发帖数: 82482 | 13 我还有算筹的呢...
还有更古老的呢。。。Fortran77的。。。 |
|
d*****n
发帖数: 3084 | 14 我正式学过的语言只有汇编和Basic，其余的都是自学的。临时需要看几个小时的教程
，马上就开始用。当然，这样也曾经出过纰漏，等我需要某些特殊功能的时候发现太困
难，只好赶紧换语言。
目前感觉只有标准C的程序可以长期用，FORTRAN77也行，但是老子需要的都是Excel能
解决的问题。其余的，赶时髦的Python，现在就不能用了，要改一些输出语句，我一个
字也懒的改。
总之，我觉得计算器是最好的最常用的工具，什么语言都比不上。到我这年纪基本靠计
算器就够了，现在手机里都有。 |
|
c********1
发帖数: 517 | 15 我们学校当初在计算机学科害苦了我们的地方：
（1）fortran77，而不是c语言。pointer, reference,定义，这些基本的东西都不理解。
（2）dos/windows而不是unix/linux.远程登录，运算的idea一点都没有。
这些都是直接影响到今后作为一个21世纪基本生存能力的。
结果老陈当初的教改，就是投钱的地方，他去花了当时非常宝贵的300万人民币，搞了
个金工实习车间。
好好的一个华东理工的学生，去学那些没屁用的焊接，造个榔头，翻个沙模什么的。
结果就是这副B样的教学改革，还有一堆的校友，都是老陈时代读书的，前后有8年啊，
还在哈啊哈的。你去看加州老校友的发言就知道了。 |
|
c********1
发帖数: 517 | 16 我们学校当初在计算机学科害苦了我们的地方：
（1）fortran77，而不是c语言。pointer, reference,定义，这些基本的东西都不理解。
（2）dos/windows而不是unix/linux.远程登录，运算的idea一点都没有。
这些都是直接影响到今后作为一个21世纪基本生存能力的。
结果老陈当初的教改，就是投钱的地方，他去花了当时非常宝贵的300万人民币，搞了
个金工实习车间。
好好的一个华东理工的学生，去学那些没屁用的焊接，造个榔头，翻个沙模什么的。
结果就是这副B样的教学改革，还有一堆的校友，都是老陈时代读书的，前后有8年啊，
还在哈啊哈的。你去看加州老校友的发言就知道了。 |
|
v****x
发帖数: 980 | 17 就是一区,带鞋套,排半天队上去玩dos和Fortran77那个? |
|
l*****o
发帖数: 101 | 18 我93级的，那年化学简单，可我考了67分，于是没考上第一志愿的专业。后来在交大待
了11年，觉得留在交大作教师实在沉闷，又离开交大了。
记得当年从火车站上了学校的巨龙车，边上站了一位女生，搭讪了一下，是我们隔壁系
的大连女生。巨龙拉到了南区的体育馆，当年那里的树还没人手腕粗。系里的上届师兄
骑了三轮车，一车一车帮我们送到北区的宿舍。
学农去卖花，康乃星。后来去行政楼遇到一位老师，聊起来是我老乡，把花买了一半去
。同组的女生在农场偷了很多小番茄，回来作番茄蛋汤，吃不完啊太多了。北区的水沟
边，常常有人吊小龙虾。市内电话去25栋或者17栋北边打，长途电话要去最南边的招待
所（？）。
元旦，班级组织包饺子时面不够了，去小森林买了几斤，回来下了锅都成元宝了，原来
这帮家伙没文化，买的是发酵过的面。有阵子，大家都去江川路批发方便面回来卖，结
果最后主要被自己人吃光了。后来搞了辆破车，熄灯后再饿，就去校医院那边2号门外
东川路上，有对年轻夫妻（？）平板车，烧着木板，卖小混沌。那时，学校南边的好第
坊小区还是一片荒地。
去包图的机房，386的主机，286的终端，乖乖，开始学的时候fortran77象 |
|
l*****o
发帖数: 101 | 19 我93级的，那年化学简单，可我考了67分，于是没考上第一志愿的专业。后来在交大待
了11年，觉得留在交大作教师实在沉闷，又离开交大了。
记得当年从火车站上了学校的巨龙车，边上站了一位女生，搭讪了一下，是我们隔壁系
的大连女生。巨龙拉到了南区的体育馆，当年那里的树还没人手腕粗。系里的上届师兄
骑了三轮车，一车一车帮我们送到北区的宿舍。
学农去卖花，康乃星。后来去行政楼遇到一位老师，聊起来是我老乡，把花买了一半去
。同组的女生在农场偷了很多小番茄，回来作番茄蛋汤，吃不完啊太多了。北区的水沟
边，常常有人吊小龙虾。市内电话去25栋或者17栋北边打，长途电话要去最南边的招待
所（？）。
元旦，班级组织包饺子时面不够了，去小森林买了几斤，回来下了锅都成元宝了，原来
这帮家伙没文化，买的是发酵过的面。有阵子，大家都去江川路批发方便面回来卖，结
果最后主要被自己人吃光了。后来搞了辆破车，熄灯后再饿，就去校医院那边2号门外
东川路上，有对年轻夫妻（？）平板车，烧着木板，卖小混沌。那时，学校南边的好第
坊小区还是一片荒地。
去包图的机房，386的主机，286的终端，乖乖，开始学的时候fortran77象... 阅读全帖 |
|
h*******c
发帖数: 248 | 20 根本没必要写这个程序。反正是科学计算。甚至几个cpu都可以hard code在代码里，运
行前先编译。以前用fortran77+mpich就是这么干的。100cpu算一个月。 |
|
|
d****y
发帖数: 1650 | 22 CHARACTER(3) SNAME
这个用法是哪个版本的fortran里的？g77认识，但是我在fortran77里的文档里都没找到。
SUBROUTINE XERBLA_ARRAY(SRNAME_ARRAY, SRNAME_LEN, INFO)
CHARACTER(1) SRNAME_ARRAY(SRNAME_LEN)
...
...
比如这里的语句，SRNAME_ARRAY是个多大的数组？
多谢 |
|
|
|
n***r
发帖数: 2074 | 25 别毛不毛了，你太年轻，跟好虫你别较劲，他功力比你深，这是肯定的
我们这帮老家伙，好歹也是Fortran77，TC2.0练过的，对吧？ |
|
c****t
发帖数: 19049 | 26 都是理想。科学计算的基本模块从来没需要超越甚至FORTRAN77的能力。数据分析要么
用SAS，好歹SAS现在有IML了，不那么土了; 如果非要自己写算法就学C,用Rcpp和
Cython。
only
power |
|
f***c
发帖数: 338 | 27 俺当年fortran77 是必修，c是选修。
后来cpp，python都是自学来的 |
|
x***u
发帖数: 297 | 28 看过这种吐槽好多遍了，忍不住上来讲讲自己的感受。
大学时第一次用FORTRAN77（你说让我们和数学计算不搭界的学这干嘛），死活编译不
过。最后才发现是某一行行首需要空两格（不能多不能少），因此一开始听说Python
的formating是比较抵触。用了很短一段时间Perl，对各种符号漫天飞恶心的不行。开
始试用Python，整个转换过程不到两天。
现在，分号和花括号反而成了我学JS的第一个障碍。
还从来没有发现哪个Editor会有indent错误。一般缺省是4个spaces indentation。要
是真的需要很深的indent话（很少情况），手动 2 spaces indent，多数Editor自动在
下一行用同样的indentation。你要非要用TAB，哪我就没办法了。
好处是逼着你把code写整齐。坏处是因为code一般是clean的，经常忘了写注释。
你要实在想用花括号的话，这有一个project：“Python with Braces”（https://
github.com/eshirazi/python-with-braces）
Quote: "As its nam... 阅读全帖 |
|
a******s
发帖数: 232 | 29 除了verbatim,listings这两个packages，还有什么简洁点的？fortran77的code |
|
t***o
发帖数: 24 | 30 I just deleted my fortran77 program I wrote by mistake. Now
I only have a.out, which is the standard compile output of
my program. Can I convert it back to fortran language file?
Help please. I am using IRIX6.2 OS. |
|
z**********g
发帖数: 4 | 31 hmm,I write a Fortran77 program.so now I need to read 2 files.
I don't want to use "open",who knows other methord?thanks. |
|
S*M
发帖数: 10832 | 32 我是做simulation的
平时干的事情，说白了就是把一堆数字放一起做加减乘除，呵呵
所以fortran77就够用了
没碰过C++这么高级的东西 |
|
g****n
发帖数: 13 | 33
我发现Vim6.0对Fortran77/Fortran90 的autoindent 都不好
do i=1,10
do j=1,10
....
end do
end do |
|
bd
发帖数: 21 | 34 我的是5。0，
其实我自己用小程序试过，好象区分的，总是有点不放心。
当初fortran77的语法是：变量名一般不超过6位，超过的只取前6位。 |
|
s*******s
发帖数: 133 | 35 F77中从一个data file读数据出来，
想从第10行读到第50行，用什么格式？
read ......
format(10n ..?)
thanks |
|
g***i
发帖数: 90 | 36 需要用direct access的读格式(?)
或先定位到第10行，再顺序读取 |
|
|
s***c
发帖数: 113 | 38 what i know is like 'sir' said, compaq visual fortran 6.6.
i need to use fortran in both windows and linux. there is already a
compiler on linux. i need one for windows.
where to get cygwin g77/f77? thanks so much.
i guess most of codes i am using are written in fortran77, not 90 or 95. |
|
w**d
发帖数: 2334 | 39 what is GSL? I never use C++ to write any program for numerical computations.
Tired of Fortran77. Wanna try C++ for next project. |
|
l***s
发帖数: 11 | 40
actually,I got acquainted with NETCDF using c/fortran77,
in http://www.unidat.ucar.edu
there are lot of information about netcdf,
current version of netcdf is 3.5.0 or 3.5.1 maybe,
of course,there are netcdf for fortran90 and java,or perl,python,ruby,a
nd matlab
in my opinion, you'd better to begin with c, it's most compact, very easy to
understand.
hope it would make any sense. |
|
c*******n
发帖数: 1648 | 41 I am new fortran programmer, when I get core dumped error. I have to
puta lot of print statement inside the program. It's very time consuming to
debug in this way. I noticed that everytime there is new core.** file
generated, can this file be the clue for the error inside the program?
Thank you!
P.S. where can I can full fortran77 manual (not for sgi, but just general
version used on linux) online? For example, what's the meaning of "reverse
.org" |
|
h***o
发帖数: 539 | 42 fortran77里面连while loop都没有，害我每次
10 continue
...
...
if (blahblah) goto 10 |
|
y***r
发帖数: 1845 | 43 2000x2000的double数组存储空间需要32MB，超过了linux下面缺省的stack space.
你应该有哪些变量放在哪些地方的知识吧，即使没有，自动型的变量放在stack上总该
知道吧？
把数组定义换成：static double A[2000][2000]; 就没有问题了。
假如使用动态内存分配，也不会有问题。
或者，你把stack空间放开，ulimit -s unlimited，也没有问题。缺省的stack soft
limit是8MB.
fortran嘛，发现数组大，有的编译器会自动扔到heap上。当然有的编译器不会，还是
要放到common中（fortran77） |
|
h***o
发帖数: 539 | 44 btw....现在fortran77都支持do... end do了？啥编译器都认吗？
我还在
do 10 i = 1, n
......
10 continue
oh....还有，twoxiao 是不是落了一逗号呀 |
|
h***o
发帖数: 539 | 45 subroutine RefineGrid(a, b, c, d)
...
...
call RefineGrid(a1, b1, c1, d1)
...
...
end
行吗？ |
|
|
s*****l
发帖数: 167 | 47 Fortran90 does.
there is a tool called f2f90 |
|
h***o
发帖数: 539 | 48 老板会分特的。
我还是用f77吧，用比较ugly的方法bypass这个recursion的问题 |
|
S***y
发帖数: 186 | 49
at most time, "ugly" may improve the performance. |
|
C***S
发帖数: 175 | 50 if you need to do FT, you better choose matlab. I do not know wether you can
find the library for FT under Fortran.
Also, since you are dealing matrix, matlab is a good choice.
If not too many loops, and you vectorized your program of matlab, it should
not be very slow.
Unix will have gcc, and mostly support fortran77.
You can check the help for detail, like man gcc
any |
|
