| 查看: 653 | 回复: 1 | ||
| 本帖产生 1 个 计算强帖 ，点击这里进行查看 | ||
dexter337铁杆木虫 (小有名气)
|
[求助]
求Fortran的处理格林函数问题的数值计算工具包
|
|
| 感谢各位大侠的帮助. |
回复此楼» 猜你喜欢
大豆异黄酮分离
已经有0人回复
-
湖南大学材料学院急招2026年博士生，临时增加一名博士联培指标
已经有10人回复
-
物理学I论文润色/翻译怎么收费?
已经有202人回复
-
天津理工大学晶体材料全国重点实验室刘红军教授课题组招收博士生1-2名
已经有1人回复
-
中国科学院物理研究所谌志国研究员团队招收2027年博士研究生
已经有5人回复
-
2026年中德博士后交流项目 - 新型量子和磁性材料：材料制备表征和中子散射研究
已经有12人回复
-
26申博推荐：南京航空航天大学国际前沿院光学方向招收博士生！
已经有1人回复
-
如何从铁电相到顺电相。
已经有1人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 请教密度泛函理论中屏蔽库伦势的问题
已经有14人回复
- 怎么找出lapack函数及函数的使用方法
已经有8人回复
- 函数可积和原函数存在问题
已经有4人回复
- 求助一个inline函数的问题
已经有5人回复
- 高数：导函数与原函数问题求助
已经有12人回复
- 递归方法求格林函数是怎么发明的?为什么要用它？
已经有6人回复
- 格林函数 积分 数值计算
已经有10人回复
- 怎么读取Siesta输出的Hamiltonian and overlap矩阵(*.HSX文件)？
已经有16人回复
- rand函数产生白噪声的问题
已经有5人回复
- 求清华大学王怀玉老师的《格林函数》讲义
已经有9人回复
- 什么是张量，基本思想是什么？
已经有14人回复
- 求助关于函数题目一道
已经有4人回复
- 【求助】transiesta和tbtrans中的电压有什么不同
已经有5人回复
- 【求助】求积分程序中被积函数问题
已经有15人回复
- 【求助】请教非平衡格林函数的问题
已经有5人回复
onesupeng
金虫 (职业作家)
- 计算强帖: 13
- 应助: 256 (大学生)
- 贵宾: 1.36
- 金币: 2336.2
- 散金: 9236
- 红花: 92
- 帖子: 4583
- 在线: 1303.8小时
- 虫号: 394701
- 注册: 2007-06-07
- 专业: 流体力学
【答案】应助回帖
★ ★ ★
dexter337(金币+20): 十分感谢您的帮助. 2011-06-02 11:19:20
sunyang1988(金币+3, 计算强帖+1): 谢谢帮助，望再接再厉，为本版带来更多质量贴 2011-06-02 12:53:49
dexter337(金币+20): 十分感谢您的帮助. 2011-06-02 11:19:20
sunyang1988(金币+3, 计算强帖+1): 谢谢帮助，望再接再厉，为本版带来更多质量贴 2011-06-02 12:53:49
|
你想要的是基本解的？我贴一个写在下面，希望对你有用。三维自由空间的格林函数 subroutine green_fs_3D() Implicit Double Precision (a-h,o-z) pi = 3.14159 265358 D0 pi4 = 4.0D0*pi dx = x-x0 dy = y-y0 dz = z-z0 r = Dsqrt(dx**2+dy**2+dz**2) G = 1.0D0/(pi4*r) If(Iopt.eq.1) Go to 999 den = pi4 * r**3 Gx = - Dx/den Gy = - Dy/den Gz = - Dz/den 999 Continue Return End |
2楼2011-06-02 10:46:25
