24小时热门版块排行榜    

查看: 927  |  回复: 5
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

xingfendou

新虫 (初入文坛)

[求助] 用fortran编写的GaAs MESFET求电流不收敛

用fortran语言编写的GaAs MESFET求电流不收敛,但是我认为电荷分配,求电场,散射率,散射机制的选择等都对,就是求的电流不收敛,还有正有负,我已经找了一个月的错误都没找到,求高手指点!
if (iter.gt.itermax-itervel+1) then
         curtot=0.
         do 1130 i=1,iycur
            curtot=curtot+(0.9*charge1(i)+0.1*charge2(i))*
     #                    (0.9*velx1(i)+0.1*velx2(i))
           curtot=curtot+charge2(i)*velx2(i)
1130     continue
         curtot=curtot*constcur
         write(41,*)curtot
      endif
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zeppe

金虫 (小有名气)

【答案】应助回帖

★ ★ ★
xingfendou: 金币+3, ★有帮助 2013-05-05 11:43:33
引用回帖:
5楼: Originally posted by xingfendou at 2013-05-03 12:23:15
电流的收敛应该是由电势,电场,漂移速度的结果引起的,整个程序太大了,但是我感觉应该是小问题,就是不知道到底错哪了...

可以试试用比较简单的能知道每一步该出什么结果的例子测试,在过程中加几个断点调试一下,看在哪个部分出错了,然后再对那个部分的程序进行调试检查。
6楼2013-05-03 13:10:40
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 6 个回答

夕阳西下

金虫 (著名写手)

【答案】应助回帖

感谢参与,应助指数 +1
do 1130 i=1,iycur
没有判断收敛的条件啊
2楼2013-05-03 11:22:35
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zeppe

金虫 (小有名气)

【答案】应助回帖

感谢参与,应助指数 +1
从选择条件 if (iter.gt.itermax-itervel+1) then 来看,只判断了迭代次数,可能还需要加上某个值小于容许误差。
3楼2013-05-03 11:57:00
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

xingfendou

新虫 (初入文坛)

引用回帖:
2楼: Originally posted by 夕阳西下 at 2013-05-03 11:22:35
do 1130 i=1,iycur
没有判断收敛的条件啊

求收敛的条件在求电势(迭代求泊松方程)中,之后求电场,再求漂移速度,然后才求电流,电势和电场分布还行,漂移速度分布大致还行,但是很有毛刺,这是老师给的一程序,有点老了,真的很想做出来
4楼2013-05-03 12:16:16
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +3 zSbvVX9JFl9J 2026-11-09 4/200 2026-11-10 19:17 by czAiolzR0IJC
[公派出国] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +3 FChKX8meu1ds 2026-11-09 3/150 2026-11-10 16:43 by G2rhSvqvhNzl
[公派出国] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +3 FChKX8meu1ds 2026-11-09 3/150 2026-11-10 16:32 by G2rhSvqvhNzl
[论文投稿] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +3 cqv1zKnzd7hr 2026-11-09 4/200 2026-11-10 12:30 by C6CRn66RYYXS
[论文投稿] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +3 cqv1zKnzd7hr 2026-11-09 4/200 2026-11-10 12:19 by C6CRn66RYYXS
[论文投稿] 售SCI一区T0P文章,我:8.O.55.1.O.5.4,科目全,可+急 +3 cqv1zKnzd7hr 2026-11-09 4/200 2026-11-10 11:35 by YHiw1gou1Eda
[教师之家] 延安大学回应“副教授留绝笔信”:确已离世,正核实举报内容 +4 yexuqing 2026-11-04 6/300 2026-11-10 11:13 by susizheng
[考研] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +3 0TEMgxdT1eIw 2026-11-09 4/200 2026-11-10 10:51 by YHiw1gou1Eda
[文学芳草园] 厉娜 +3 张丹枫1991 2026-11-09 5/250 2026-11-09 16:53 by 张丹枫1991
[考博] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +5 kvewwGtKktqB 2026-11-04 12/600 2026-11-09 13:26 by Equinoxhua
[考研] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +6 5sJFDKp2kwuI 2026-11-06 14/700 2026-11-09 11:52 by GwrQVVR6Oenx
[考博] 售SCI文章,我:8O.5.5.1O.54,科目全,可十急 +5 5sJFDKp2kwuI 2026-11-06 15/750 2026-11-09 11:41 by GwrQVVR6Oenx
[考研] 售SCI一区T0P文章,我:8O.55.1.O.54,科目全,可伽急 +3 5sJFDKp2kwuI 2026-11-06 12/600 2026-11-09 06:32 by l48hFd8Nwae2
[公派出国] 售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急 +4 5sJFDKp2kwuI 2026-11-06 8/400 2026-11-09 00:14 by l48hFd8Nwae2
[公派出国] 售SCI一区T0P文章,我:8.O.55.1.O.54,科目齐全,可+急 +5 ttH3f1oA6ace 2026-11-04 10/500 2026-11-06 16:12 by 5sJFDKp2kwuI
[公派出国] 售SCI一区文章,我:8.O.551.O.5.4,科目全,可伽急 +6 ttH3f1oA6ace 2026-11-04 12/600 2026-11-06 16:10 by 5sJFDKp2kwuI
[公派出国] 售SCI一区T0P文章,我:8.O.55.1.O54,科目全,可伽急 +5 kvewwGtKktqB 2026-11-04 14/700 2026-11-06 05:10 by qL1cU46YIdK0
[硕博家园] 售SCI一区T0P文章,我:8O.55.1.O.5.4,科目齐全,可+急 +6 kvewwGtKktqB 2026-11-04 16/800 2026-11-06 05:00 by qL1cU46YIdK0
[考博] 售一区SCI文章T0P,我:8O.551.O54,科目全,可十急 +4 ttH3f1oA6ace 2026-11-04 7/350 2026-11-06 02:13 by qL1cU46YIdK0
[考研] 售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急 +4 ttH3f1oA6ace 2026-11-04 10/500 2026-11-06 02:04 by qL1cU46YIdK0
信息提示
请填处理意见