| 查看: 602 | 回复: 5 | ||
| 【奖励】 本帖被评价4次，作者zhaoyuan0426增加金币 3.2 个 | ||
[资源]
双模激光器
|
||
|
双模激光器 利用Matlab模拟双模激光器的双模振荡，并且分析两个模的竞争与稳定性。 下面是课本教材：     利用Matlab模拟如下： 函数程序： function ydot=fun(t,y,flag,a,b,c) ydot=[y(1)*(a-b*y(1)-c*y(2)); %dI1/dt y(2)*(a-b*y(2)-c*y(1))]; %dI2/dt 主程序： a=1; b=1; c=0.5; axis([0,2,0,2]); hold on x0=[0.2,0.4,0.6,0.8,1,1.2,1.4,1.6,1.8,2]; for i=1:10 [t,y]=ode45('fun',[0:0.01:100],[x0(i),2],[ ],a,b,c); plot(y(:,1),y(:,2),'b');axis square end y0=[0.2,0.4,0.6,0.8,1,1.2,1.4,1.6,1.8,2]; for i=1:10 [t,y]=ode45('fun',[0:0.01:100],[2,y0(i)],[ ],a,b,c); plot(y(:,1),y(:,2),'b');axis square end a=1; b=1; c=0.5; axis([0,2,0,2]); hold on x0=[0.2,0.4,0.6,0.8,1,1.2,1.4,1.6,1.8,2]; for i=1:10 [t,y]=ode45('fun',[0:0.01:100],[x0(i),2],[ ],a,b,c); plot(y(:,1),y(:,2),'b');axis square end y0=[0.2,0.4,0.6,0.8,1,1.2,1.4,1.6,1.8,2]; for i=1:10 [t,y]=ode45('fun',[0:0.01:100],[2,y0(i)],[ ],a,b,c); plot(y(:,1),y(:,2),'b');axis square end x0=[0.02,0.04,0.06,0.08,0.1,0.12,0.14,0.16,0.18,0.2]; for i=1:10 [t,y]=ode45('fun',[0:0.01:100],[x0(i),0.2],[ ],a,b,c); plot(y(:,1),y(:,2),'b');axis square end y0=[0.02,0.04,0.06,0.08,0.1,0.12,0.14,0.16,0.18,0.2]; for i=1:10 [t,y]=ode45('fun',[0:0.01:100],[0.2,y0(i)],[ ],a,b,c); plot(y(:,1),y(:,2),'b');axis square end     [ Last edited by zhaoyuan0426 on 2012-4-14 at 22:27 ] |
回复此楼» 本帖附件资源列表
-
欢迎监督和反馈：小木虫仅提供交流平台，不对该内容负责。
本内容由用户自主发布，如果其内容涉及到知识产权问题，其责任在于用户本人，如对版权有异议，请联系邮箱：xiaomuchong@tal.com - 附件 1 : 作业程序.doc
- 附件 2 : 作业绘图.rar
- 附件 3 : 打印.doc
2012-04-14 19:57:13, 33.5 K
2012-04-14 19:57:13, 941.35 K
2012-04-14 19:57:14, 171 K
» 猜你喜欢
瑞典林雪平大学博士后招聘｜PEC Water Splitting 方向
已经有130人回复
-
PRB投稿，Acknowledgment sent to author状态十天了
已经有3人回复
-
物理学I论文润色/翻译怎么收费?
已经有110人回复
-
PVA溶解
已经有2人回复
-
基金申请
已经有44人回复
-
CSC与新西兰维多利亚大学PhD奖学金项目
已经有0人回复
-
新西兰Robinson研究所 招聘CSC公派访问人员
已经有0人回复
-
帮我的英语口语老师找学生
已经有0人回复
-
什么时候开奖？
已经有6人回复
-
散金币祈福
已经有94人回复
2楼2012-04-14 19:58:33
3楼2012-07-02 11:22:09
6楼2014-09-02 22:30:29
简单回复
2012-10-11 22:11
回复
五星好评 顶一下，感谢分享！
2012-10-11 22:12
回复
顶一下，感谢分享！
