| 查看: 351 | 回复: 0 | ||
[求助]
求助高版本1stopt帮忙跑一下程序,程序还有报错,不知道该怎么解决,求助大神
|
|
程序如下,数据文件见附件 Title coupled mode theory; complexstr=i; Parameters w0,Qw,Qi,Qc,f,C; Variable lam,T; Function T=abs(1-(w0/(2*Qw)/(i*(2*pi*(3*10^8)/lam-w0)+w0/(2*Qi)+w0/(2*Qw)+(w0/(2*Qc))*(1-C*exp(i*(2*pi*sqrt(1-2*sqrt(1-(3.7-1.38*10^16/((2*pi*(3*10^8)/lam)^2+2.73*10^26)))/(2*pi/lam*(5*10^-8)*(3.7-1.38*10^16/((2*pi*(3*10^8)/lam)^2+2.73exp26))))*(6*10^-7)/lam+f)))/(1+C*exp(i*(2*pi*sqrt(1-2*sqrt(1-(3.7-1.38*10^16/((2*pi*(3*10^8)/lam)^2+2.73*10^26)))/(2*pi/lam*(5*10^-8)*(3.7-1.38*10^16/((2*pi*(3*10^8)/lam)^2+2.73exp26))))*(6*10^-7)/lam+f))))))^2; DataFile C:\Users\yy\Desktop\1stopt\SR2.xls[sheet1[A1:B701]]; |
» 本帖附件资源列表
-
欢迎监督和反馈:小木虫仅提供交流平台,不对该内容负责。
本内容由用户自主发布,如果其内容涉及到知识产权问题,其责任在于用户本人,如对版权有异议,请联系邮箱:xiaomuchong@tal.com - 附件 1 : SR2.xls
2016-11-11 16:44:04, 28.5 K
» 猜你喜欢
散金币祈福
已经有186人回复
求助,如何提取ELK的rt-TDDFT在某一时刻的自旋密度分布和电子密度分布
已经有1人回复
物理学I论文润色/翻译怎么收费?
已经有233人回复
澳门大学IAPME李海峰教授常年招收博士研究生
已经有0人回复
澳门大学IAPME李海峰教授常年招收博士研究生
已经有0人回复
澳门大学IAPME李海峰教授常年招收博士研究生
已经有0人回复
深圳大学应用技术学院招聘凝聚态物理博士后
已经有113人回复
深圳大学2027级光电信息工程/物理学研究生推免
已经有69人回复
求助中医院临床中医中标的青年标书学习,谢谢
已经有4人回复
浙大物院表面物理课题组长期招收普博及直博学生
已经有257人回复
【征稿】Springer Nature热电专题 Discover Materials / Discover Chemistry
已经有39人回复










回复此楼