y**i
发帖数: 357 | 1 调程序时偶然发现的，只要将以下五行加到Fortran90的程序中，再让f90来编译就可以让f90当掉. 在UltraSparc10上可以吃掉300M内存，生成的.o有160M.
(这Code是标准的f90,没有任何语法错误, 用Compaq(DEC)的VisualFortran编译就没问题。)
下面就是，考下来，取名blow.f90, 然后运行 f90 -c blow.f90
Program Blow
INTEGER, PARAMETER :: s = 5000000 !! s must be a large number
DOUBLE PRECISION a(s)
DOUBLE PRECISION b(s)
DOUBLE PRECISION c(s)
REAL :: r=1.1 !! can assign 'r' any type, integer, double precision ...
End Program Blow
让f90编译器傻掉的是最后一句：'REAL :: r = ...', 我搞不懂为什么会这样，写成
'REAL |
|
c*********n
发帖数: 5 | 2 现有俩fortran计算程序包,分别用g77和f90些的
现要把它们结合在一起,能否有什么办法?
问题主要是连接不成功,如,用f90连接时,会
提示很多名字找不到,用g77连接时,又说
一些f90过程调用不存在 |
|
y**i
发帖数: 357 | 3 想出点门到了，应该是Sun f90 compiler的一个bug。f90好像会把夹
在两个Constant定义中的其他定义也都当成Constant一样把数据生成
在代码中，但实际上并不是const,在run time是可以改变的。
哎，还是Windows下的VisualFortran好，bug少，而且数组在刚运行
并不占内存，只有真正用到时才动态增加要用的内存。 |
|
f**y
发帖数: 368 | 4 【 以下文字转载自 Linux 讨论区 】
发信人: fycy (FeiYueChongYang), 信区: Linux
标 题: 菜鸟问题：f90是哪个fortran编译器？
发信站: BBS 未名空间站 (Sun Nov 18 14:53:12 2007)
make文件里面要用f90命令，请问是安装哪个fortran编译器？现有的pgf90编译通不过
。谢谢。 |
|
F******l
发帖数: 90 | 5 【 以下文字转载自 Linux 讨论区 】
发信人: Football (Ball), 信区: Linux
标 题: gfortran 编译f90程序
发信站: BBS 未名空间站 (Wed Apr 30 12:52:03 2008), 转信
怎么也弄不对，不知道用什么option，看了半天manpage也不明白
那位递个援手？
谢了 |
|
w*******g
发帖数: 99 | 6 What's what I did but I just wonder whether there is such a function in Sun F90
compiler. It should be Fortran standard... |
|
y****a
发帖数: 109 | 7 f90 is the generic name for a Fortran 90/95 compiler. Commonly available
Fortran 90/95 compilers are Gfortran, G95. |
|
g****d
发帖数: 64 | 8 www.netlib.org has some f90 interface. That might be useful.
Most of fortran compiler will add an underscore after each file name, such as
filename_ . So when you might need to call filename_(...) instead of
filename(..) |
|
x********g
发帖数: 47 | 9 请高手指教 。 makefile如下：
# application name
APP = parallel_femsim
# list of source files
SRC = ran2.f90 globals.f90 model.f90 scattering_factors.f90 fem1.f90
parallel_femsim.f90
# list of object files
OBJ = ran2.o globals.o model.o scattering_factors.o fem1.o parallel_femsim
.o
# define libraries needed by the linker
#LIBS = -lmkl
# compiler options for debugging
FC_DEBUG = mpif90 -g -debug -implicitnone
# compiler options for optmized running
#FC_OPT = ifort -O3 -xO -ipo -no-prec-div -static
#F |
|
c*********r
发帖数: 19468 | 10 AC
ACC COBRA BN7667 SA9AK3026SA0175113
ACC ACE BN2323 SA9AC3029RAO62033
ACC ACE BN7888 DES1031
ACC ACE BN2228 DES1032
ACC COBRA BN513 SA9AK3024SA017512
ACC ACE BN6363 SA9AC3023RA06230
ACC COBRA COB1V SA9AK3022SA017511
ACC ACE BK12 SA9AC3027SA062036
ALFA ROMEO
ALF 164 BL5002 ZAR16400006209070
ALF 164 BL9271 ZAR16400006262569
ALF 164 BL7585 ZAR16400006208842
MERCEDES BENZ SPECIALS BY AMG
AMG 600 BP9922 WDB10001222000143
AMG 600SEL BN9933 WDB1400572A192240
AMG 600SL BN8668 WDB1290762F102243
AMG 600... 阅读全帖 |
|
t****n
发帖数: 39 | 11 What's the extension of your fortran source file? Some f90 compiler support
both f90 and f77. You must end your source file with .f90 then the compiler
will consider it as a F90 file. Just my 2 cents. :) |
|
S***y
发帖数: 186 | 12
ifc -c sub1.f90
ifc -c sub2.f90
ifc -c sub3.f90
ar qv libsub.a sub1.o sub2.o sub3.o
ifc your_prog.f90 -o your_exec -L.... -lsub |
|
t*******t
发帖数: 1067 | 13 If you use emacs to edit the code, you can easily do it.
If your code is .f90, you can find F90 on the menu, so highlight the part
you want to comment out, then point mouse to F90 on the menu, you can
find an option named "Comment-out region", then click it. You can also
easily uncomment it. If your code is .f, you can find fortran on the menu,
then do it in the same way.
instead |
|
m****r
发帖数: 111 | 14 确实没有，在source file上右键点compile以后，只在output窗口出现
Compiling with Intel(R) Visual Fortran 11.1.038 [IA-32]...
Source1.F90
D:\。。。。\Source1.F90(9): error #6785: This name does not match the unit
name. [MULT1]
compilation aborted for D:\stat\TS\software\literature\Console2\Console2\
Source1.F90 (code 1)
Build log written to "file://D:\...\Console2\Debug\BuildLog.htm"
Console2 - 2 error(s), 0 warning(s) |
|
M***y
发帖数: 1594 | 15 Xuemei (Maisy) Huang
32560 Stony Brook Lane, Solon, OH 44139
Email:m*********[email protected], Phone: 440-498-2222(h), 216-978-5913(c)
Skills
Comprehensive experiences on scientific computation/simulation
and algorithm development
Hand-on experiences on multiple programming Languages including
Matlab, C/C++/C#, Perl, F77/F90, shell scripts, Java, SAS, Labview, Python
and SQL
System administration skills on Microsoft Windows, Linux
operation systems and computer ha... 阅读全帖 |
|
M*********e
发帖数: 3153 | 16 SEKONIC L408，sekonic第一代多功能表
带入射反射测光，可以测闪光，（同步线/无同步线）
可以光圈优先，速度优先，还可以换算成照度和EV，
一直需要一个这样的表，但是世光后期的多功能表个头都很大，
虽然可以达到1度点测，我又不一定用的上，而且价钱也贵了很多
抄书：
测光范围：
l Ambient light: Incident light EV-1 to EV19.9 (in 0.1 step)
Reflected light EV2.5 to EV22.9 (in 0.1 step)
l Flash : Incident light F1.0 to F90 +0.9 stop (in 0.1 step)
Reflected light F2.0 +0.5 stop to F90 +0.9 stop (in 0.1 step)
k09.1 EV or less
* IS0 (film speed): 3 to 8000 (at 1/3 SV)
* T (shutter speed):
Ambient light: 30 min to 1/800 sec (in 1 se |
|
m*****s
发帖数: 4427 | 17 F90, F4以后的都行， 上次25刀买了个F90 |
|
|
t****n
发帖数: 39 | 19 I don't know what's your server. If you are using SGI serious, such as
O2, Origin 2000, etc. the compiler come with the system can do the
parallization for you. The command is "f90 -apo source.f90 -o des"
There is another choice name OpenMP. You can go to www.openmp.org for detail.
What you need to do is just add some Macro to your original code and
compile with -mp option, you can get parallelized executable code.
The other choice is to rewrite the code thoroughly with MPI or PVM. Try to
search |
|
z****c
发帖数: 6 | 20 Hi, guys,
After i modify the source file and build the executable file with make,
the message reads as:
make: Warning: File `a.out' has modification time 34 s in the future
f90 -o a.out vortex.f90 comdata.o dsckernel.o
make: warning: Clock skew detected. Your build may be incomplete.
What's the problem here? and what's the clock skew? |
|
p****e
发帖数: 468 | 21 I used .f90 . It is a F90 compiler, just not a standard one. |
|
t*****o
发帖数: 74 | 22 偶以前用F77编译， 最后文件大小是12MB
最近换成F90， 文件大小一下子变成50多M
然后学校最近好象又升级了一下系统， 现在变成60多M
有些受不了了， 总共也就300M空间 。。。
有什么方法让它减肥吗？ 偶用 F90 -c -O3 |
|
t****n
发帖数: 39 | 23 Strongly suggest f90 over f77. With f90, you can get Modular programming,
dynamic memory allocate/dallocate, free programming format. And you are
also going to note a little loss of efficiency, though it's very small.
The following web site has a lot of materils you need:
http://www.liv.ac.uk/HPC/F90page.html |
|
h***o
发帖数: 539 | 24 f77, f90, f95....这都有啥改进呀。
老板好象又对f90感兴趣了 |
|
S***y
发帖数: 186 | 25
持保留意见。应该说用Fortran和C的人都在增多，不过用C的增加更快。
但还是那句话，这没可比性，因为C应用领域广的多。
应该是已经淘汰了吧，没人再用F77写专业程序了，我想。
F90是比F77复杂多了，但其实把Module和Allocatable Array整明白，
再把那些增加的Intrinsic Functions记住，就差不多了。
Intel有免费的F90/95的编译器啊，性能不错。
你要是买更牛的机器，这compiler的成本应该是占很小的比例吧。
关于Portability, 我用过的commercial packages, 用Fortran写的都可以
在我所有的机器上编过，IBM, SGI, Alpha, Itanium, Pentium ...
C的我没用过。但我想实际上很少有C的程序是在ANSI Standard下写的，
都或多或少的使用了compiler-dependent extensions，所以这portability
反而会有问题。纯属个人愚见。:)
免费的Fortran写的library就更多到我都不想说了，当然都是做计算的。:(
当你面向整个世界时， |
|
g******s
发帖数: 733 | 26 程序如下
PROGRAM MAIN
IMPLICIT NONE
real aa
aa=1023.0/2.0*1.0e-4
print*,aa
END PROGRAM
用f90 filename.f90 -o filename之后，filename出来的结果是0.051149997
用f77，把1023.0改成1021.0或1025.0,或者把*1.0e-4改成/1.0e4都对。
什么原因？先谢了！ |
|
g******s
发帖数: 733 | 27 thanks a lot! But I don't know how to separate the compiling and link commands
. I use "f90 filename.f90 -o filename" which has put the compiling and link
together; or "f77 -c [-O4] filename.f" which doesn't recognize the switch "-r8
" or "-r16". What kind of compile and link commands shall I use if I want to
add the switch -r8 or -r16?
most
it |
|
b**n
发帖数: 289 | 28 I try to generate Gaussian distribution random numbers using gasdev() which
references ran1(). But the compiler I use (ifort) gives me the following
error:
/tmp/ifortWvLH4w.o: In function `randomn_.gasdev_':
random.f90:(.text+0x359): undefined reference to `ran1_'
random.f90:(.text+0x36b): undefined reference to `ran1_'
So strange.
I attached the code. It looks a little bit strange below.
PROGRAM RANDOMN
IMPLICIT NONE
INTEGER :: idu=-10
REAL :: random
print *, ran1(idu),ran1(idu)
idu=- |
|
l*******G
发帖数: 1191 | 29 对于自己定义的数据（结构）的成员打印格式居然出问题。有兴趣的看一下为何主程序
最后两行打印结果不一样？gfortran and ifort give same results on linux.
=====save to test.f90, and then "ifort test.f90" and then "./a.out" to run=====
module numz
integer, parameter:: b8 = selected_real_kind(14)
integer,allocatable :: a_gene(:),many_genes(:,:)
end module
module galapagos
use numz
... 阅读全帖 |
|
l*******G
发帖数: 1191 | 30 对于自己定义的数据（结构）的成员打印格式居然出问题。有兴趣的看一下为何主程序
最后两行打印结果不一样？gfortran and ifort give same results on linux.
=====save to test.f90, and then "ifort test.f90" and then "./a.out" to run=====
module numz
integer, parameter:: b8 = selected_real_kind(14)
integer,allocatable :: a_gene(:),many_genes(:,:)
end module
module galapagos
use numz
... 阅读全帖 |
|
R********s
发帖数: 182 | 31 我有fortran 的code YYY.f90 如下：
PROGRAM MAIN
!
implicit none
INTEGER lambda(2),lim
integer df(2),ifault
REAL q,nc(2),sigma,acc,trace(7),res
nc = (/0,0/)
lambda=(/0.5,0.5/)
df = (/1,1/)
q = 10
lim = 10000
sigma = 0
acc = 0.0001
res = 0
call compute(lambda,nc,df,2,sigma,q,lim,acc,trace,ifault,res)
END program MAIN
XXX.cpp的code 如下：
#define UseDouble 0 /* all floating point double */
#include
#include 阅读全帖 |
|
|
|
s**********d
发帖数: 36899 | 34
那时候人还比较真诚，一般给来问的推荐个F90就觉得不好意思了。
基本上没人说你得用F4 F5才行。 |
|
B********e
发帖数: 312 | 35 如果你是单身，人在美国，按美国居民身份报税，你需要注意什么时候应该报这两个表：
1.8938： 如果你海外账户， 或你的投资账户， 或你的人身保险价值，或你的海外公
司直20万美元OR ABOVE，你应该填该表，和1040一起递交给IRS.
2. TD F90-22.1，即所谓的FBAR， 是每年6月30日以前报前一年的。如果你的海外账户
，或你的人身保险价值超过1万美金。
后果很严重，面临重罚，也可能坐牢。 |
|
H********y
发帖数: 3322 | 36
我最开始是NIKON， 第一台单反是 NIKON F90， 最高端用过D700. 但是对D700太失望
了。不P颜色没法看。
用d700拍的。
也用过fuji的S5 PRO， D200机身， 但是核心是FUJI的SUPER CCD， 色彩宽容度都超赞。
fuji S5 PRO
CANON的1d系列和5dii也玩过， 完全没爱。 当然也没有像样的照片。
后来SONY A900出来以后真的做的不错， 照片直出都已经非常好了。 就进了A900，
a850一直用到现在。
其他我其实还有一些MINOLTA的胶片和镜头。
另外也有PENTAX 67加波拉背， 但是也是只有喜欢的女孩才会拿这个拍。 |
|
j****q
发帖数: 85 | 37 定了AT&T DSL,发现现在的MODEM不能用, 如果谁有多余的AT&T DSL的MODEM, 比如2WIRE
, 或WESTELL F90 想出售的话, 请和我联系, 谢谢! |
|
w*****3
发帖数: 910 | 38 My system is Ubuntu 10.10. I have a software which needs to compile from
source using Portland Group F90 compiler pgf90. However this compiler is not
free. I wonder whether I can use GNU free compiler, such as gfortran, to
compile the source code. There are some compiler configurations for
different compiler that I need to clarify. If somebody is a guru in this
field, please leave a message. I may contact you in person. Thanks a lot. |
|
|
b*****t
发帖数: 3928 | 40 老实交代一下。D300是我的第一台数码。这之前根本没关心数码市场。当时买的原因是
除了D3，没有比D300更好的了。另外，手上的镜头都可用在D300上。我当时还不知道有
残福这个说法，没注意到D3是全副。买了之后才做功课，有点受骗的感觉。不过D300也
算不错了。D300的祖师爷F801（米国这边好像N8080)我也有，好像是 F801（8080）-
F90-F100-D100-D200-D300过来的。所以感觉不错。 |
|
b*****e
发帖数: 1264 | 41 周日租的飞机百病缠身，下次再也不租这一架了。
自己有飞机的话，就会很爱惜，有什么问题也会去解决。这一点就像租车。
下面是日志。
10月 26日
飞行日志之九八 666（F90）
N48666以后是不会飞了。
原计划是去IJD，让U Conn的同学尝试一下飞行。天气预报还挺准的，昨天半夜雷鸣电
闪，风雨交加，变压器被闪电击中，导致小区停电。没想到今天一早天就放晴了，风也
只有6、7节。因为IJD飞过四五次了，没有特地作计划，就查了一下天上的风速风向，
估计一下航向。
12点10分到了Midisland， Amenda给了48666，就是上次去MVY的那架。虽然5416B在，
但是上次飞666没啥问题，就是它了。由于三架Air Combat USA的飞机占了停机位，666
这次停在远离机库的一角，机头翘的老高，燃油不满，机油不足4夸脱，右轮好像气压
不太够，乘客一侧固定肩部安全带的塑料板也不见了。。。毛病不少。总之全部搞定了
都快12点40了。
从33起飞，感觉发动机振动比其他飞机大，好在运转一段时间以后幅度降低。离地以后
飞机老是有左转的倾向，照理巡航得时候，飞机是平衡的，不需要蹬舵，可 |
|
w***s
发帖数: 7132 | 42 精神病院长: 肉眼看不出区别
精神病院长 http://www.sina.com.cn 2000年2月8日 18:22 新浪生活
肉眼看不出区别。（一）
我是爱看的。好色。男人都这样好色，好色的男人在条件许可的情况下，难免地就
会好摄。看了身边的十几个男人， 从20岁到60岁的，都在曾经的岁月里有过摄影的经
历。说到摄影两个字，好像会把这两个字糟蹋了。毕竟这两个字后面常 常跟着艺术两
个字。那就说照相吧。
办公室里一位40岁的同事的第一架相机是海鸥205，他说当年那可是他的一笔大开
支。后来他说有了海鸥DF， 他现在竟然记不清那机器叫什么，是我提醒了半天，他才
想起来的。他说他当年还和一个哥们弄了台放大机，小黑屋里一弄一 宿。
父母的第一台相机是海鸥203，折合式的，好像是85元，每次出去照相，父亲都得
把那机器抱得紧紧的，怕丢了 、摔了、碰了。当年一台200元的9寸黑白彩电是我们家
几口人几年的梦想。记得那时候父母是用大水碗冲卷的，一提一拉 ，像抻面。胶卷是
过期的，便宜。印相箱是父母的朋友自制的，木头盒子，上面一块玻璃。印照片时，手
要按实了，然后在黑 暗中小声数“1、2、3、4…... 阅读全帖 |
|
i**x
发帖数: 326 | 43 1。如果你不愿意或没有条件背一堆器材，千万带上一个质量
可靠的小巧的傻瓜机，广角段最好到24mm或28mm。带上足够
的胶卷和可靠的电池（如果去高山地区的话，拉萨啥的没问题）。
2。我的清单
我带了
Canon A2 + battery pack (use 4 D batteries)
Sigma 24mm/2.8
Sigma 70-300mm/4-5.6
filter: UV for both lens, Circular Polarizer, 81B(微偏暖)
借了红黄滤镜各一。
三角架: Bogen 3205+3030
cleaning kit
摄影背心
防水防震的摄影包
所费胶卷：RVP 18 rolls, Tmax400cn 3 rolls, Kodak G200 4 rolls
3。遇到的问题
3。1 A2的高原反应
我走以前查了不少资料，没发现A2(亚洲叫EOS 5)有任何不良记录。与之对比的，
盛传F90在青藏高原时而罢工，F70也有问题。高原气压温度的变化对电池
和一些啥电路好象是很大的考验。我特地配了A2的battery pack，配上
四节D，比A2机身还重，但确 |
|
C***l
发帖数: 2625 | 44 年代太久远，很多细节都忘得差不多了，如果当年的哥们还来这里而且还记得的话，就
补充补充吧。
最早这个bbs开的时候，印象中只有arts版，photographer版是后来开的，因为我记得
最开始我跟人交流照片是在arts版发贴。最开始也没有贴图功能，只能给自己主页的链
接。那时候不管是在arts版还是photographer版，都非常冷清，别说讨论照片，连讨论
器材的帖子都很零星，大多数帖子往往是问个器材问题，得到回答了就走人。当年在那
两版里交流的人中只记得LowIQ，sheen和zooie了。当时zooie的风光和纽约人文的片子
非常好，他用的是F3和F90，扫描用LS 2000，如果我记得没错的话。据说他是清华本科
到美国来参加数学奥赛，后来被这边学校录取了的，所以不论是学业还是摄影，我当时
都为之高山仰止。Sheen也是清华毕业的，后来移民新西兰，再跑到美国，当时他贴了
一些新西兰的风光，让我很是艳羡，私下聊过发现原来他和我中学同学在清华同班睡上
下铺，世界真小。
99年的时候3k，也就是现在大家说的老邢，给bbs增加了贴图功能，其用法到现在都没
变过，但在photograph |
|
C***l
发帖数: 2625 | 45 【 以下文字转载自 PhotoForum 讨论区 】
发信人: Cajal (H4), 信区: PhotoForum
标 题: 一些photoforum版的史前史（上）
发信站: BBS 未名空间站 (Mon Feb 8 23:45:38 2010, 美东)
年代太久远，很多细节都忘得差不多了，如果当年的哥们还来这里而且还记得的话，就
补充补充吧。
最早这个bbs开的时候，印象中只有arts版，photographer版是后来开的，因为我记得
最开始我跟人交流照片是在arts版发贴。最开始也没有贴图功能，只能给自己主页的链
接。那时候不管是在arts版还是photographer版，都非常冷清，别说讨论照片，连讨论
器材的帖子都很零星，大多数帖子往往是问个器材问题，得到回答了就走人。当年在那
两版里交流的人中只记得LowIQ，sheen和zooie了。当时zooie的风光和纽约人文的片子
非常好，他用的是F3和F90，扫描用LS 2000，如果我记得没错的话。据说他是清华本科
到美国来参加数学奥赛，后来被这边学校录取了的，所以不论是学业还是摄影，我当时
都为之高山仰止。Sheen也 |
|
c****7
发帖数: 366 | 46 买了NIKon D90套机（with 18-105套头），用了也就3个月。
三天两头见F90 error，送到Nikon去修，结果回来照旧。
塑料的接口就是不行。
能不买就不买吧。 |
|
c******8
发帖数: 3170 | 47 64、 Nikon F50 ——1994年推出，是F90的简化版。取消了3DTTL闪光控制，增加了
多种程序曝光模式，但不支持手动镜头测光。
哎，这个F50不是1994年出的吗， |
|
|
h*******g
发帖数: 10585 | 49 Magnum里片子卖的最贵的是Martin Parr用的是F90 + SB灯 |
|
b*******s
发帖数: 6139 | 50 Wiki...
Film 35 mm SLR cameras with autofocus
Nikon AC-2E Data Link System (1993)
* Nikon F3AF (1983, modified F3 body with Autofocus Finder DX-1)
* Nikon F-501 (1986, known in North America as the N2020)
* Nikon F-401 (1987, known in the U.S. as the N4004)
* Nikon F-801 (1988, known in the U.S. as the N8008)
* Nikon F4 (1988)
* Nikon F-401S (1989, known in the U.S. as the N4004S)
* Nikon F-601 (1990, known in the U.S. as the N6006)
* Nikon F-401X (1991, known in ... 阅读全帖 |
|
