计算化学公社

标题: 请教:能量跨度模型有关的这个Fortran程序在服务器上如何使用? [打印本页]

作者
Author:
xiaowandouer    时间: 2021-7-29 16:17
标题: 请教:能量跨度模型有关的这个Fortran程序在服务器上如何使用?
如题
程序已上传
根据程序要求也准备了输入文件tof.ene,一并上传
但不知道怎么在服务器上用起来
请教懂程序的社友


(, 下载次数 Times of downloads: 14)

(, 下载次数 Times of downloads: 19)




作者
Author:
sobereva    时间: 2021-7-29 16:22
把tof后缀加上.f90,然后用Fortran编译器编译。启动程序后,输入诸如nico,就会读取当前目录下的nico.ene,一边计算一遍把信息输出在屏幕上以及.tof为后缀的文件里。
作者
Author:
xiaowandouer    时间: 2021-7-29 16:24
sobereva 发表于 2021-7-29 16:22
把tof后缀加上.f90,然后用Fortran编译器编译。启动程序后,输入诸如nico,就会读取当前目录下的nico.ene

谢谢社长!用gcc是否可以编译?
作者
Author:
xiaowandouer    时间: 2021-7-29 16:49
sobereva 发表于 2021-7-29 16:22
把tof后缀加上.f90,然后用Fortran编译器编译。启动程序后,输入诸如nico,就会读取当前目录下的nico.ene, ...

用gfortran和ifort都试了,编译失败,不知道该怎么改。fortran程序我是从原文献上复制的。

ifort编译的出错信息如下:
tof.f90(20): error #6406: Conflicting attributes or multiple declaration of name.   [TOF]
REAL::temp,ktemp,dummy,dg,delta,m=0.,tof,de,maxtsr,tsd  
-------------------------------------^
tof.f90(60): error #6413: This global name is invalid in this context.   [TOF]
tof=kbh*temp*delta/m  
^
tof.f90(63): error #6413: This global name is invalid in this context.   [TOF]
WRITE(*,40)tof  
-----------^
tof.f90(64): error #6413: This global name is invalid in this context.   [TOF]
WRITE(2,40)tof  
-----------^
compilation aborted for tof.f90 (code 1)


作者
Author:
xiaowandouer    时间: 2021-7-29 17:53
本帖最后由 xiaowandouer 于 2021-7-29 17:54 编辑

这是原始文献给的程序。

作者
Author:
lyj714    时间: 2021-7-29 18:34
本帖最后由 lyj714 于 2021-7-29 18:44 编辑

  1. program TOF
复制代码

随便改个其他名称,比如:
  1. program MYTOF
复制代码

如果在gfortran下还有其他报错,就把:
  1. kbh=20836643994
复制代码
改成
  1. kbh=20836643994D0
复制代码



作者
Author:
sobereva    时间: 2021-7-30 07:08
xiaowandouer 发表于 2021-7-29 16:24
谢谢社长!用gcc是否可以编译?

这又不是C/C++语言写的,显然不能用gcc

报错原因前面的人说了。
不同编译器对语法的严格程度要求不一样,作者那里能编译不代表用当前自己的编译器能编译。
作者
Author:
xiaowandouer    时间: 2021-7-30 09:16
lyj714 发表于 2021-7-29 18:34

随便改个其他名称,比如:

非常感谢,编译成功!!!
作者
Author:
zll12369    时间: 2025-5-12 11:08
xiaowandouer 发表于 2021-7-29 17:53
这是原始文献给的程序。

老师您好,请问这是哪一篇文献给的,方便告知一下吗
作者
Author:
xiaowandouer    时间: 2025-6-10 11:35
zll12369 发表于 2025-5-12 11:08
老师您好,请问这是哪一篇文献给的,方便告知一下吗

Organometallics, 2009, 28,3656-3665
作者
Author:
zll12369    时间: 2025-6-11 15:50
xiaowandouer 发表于 2025-6-10 11:35
Organometallics, 2009, 28,3656-3665

好的,谢谢您!




欢迎光临 计算化学公社 (http://bbs.keinsci.com/) Powered by Discuz! X3.3