24小时热门版块排行榜    

查看: 1249  |  回复: 12

涂涂木

金虫 (正式写手)

[求助] 大侠,帮我解释下迭代准则的程序描写,

P0(I) = P0(I) + DELTA(I)   迭代表达式!

  EPS = SUM(DABS(DELTA(:NCOMP)/P0(:NCOMP) ))   迭代准则!
            DEPS= DABS((EPSPREV-EPS))
            ITER = ITER + 1

            EPSPREV = EPS

          ENDDO  LOOP1A

          IF ( ITER >= MAXITER ) THEN
            WRITE(*,*) 'MAXIMUM ITERATIONS FOR Qi->Pi REACHED'
          ENDIF

我想问一下,在这个迭代准则里,EPSPREV= EPS  后,原来的EPS等于多少啊,或者能不能告诉我,这个循环进行下去,EPSPREV 和EPS 在每个循环中怎么变换的啊!
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐,对您同样有帮助:

向前看
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
回帖置顶 ( 共有1个 )

涂涂木

金虫 (正式写手)

普通回帖

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

★ ★
感谢参与,应助指数 +1
余泽成(金币+2): 谢谢参与应助! 2011-12-31 11:00:49

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖

★ ★
余泽成(金币+2): 谢谢参与应助! 2011-12-31 11:01:22

涂涂木

金虫 (正式写手)

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖


余泽成(金币+1): 辛苦了! 2011-12-31 11:01:36

涂涂木

金虫 (正式写手)

涂涂木

金虫 (正式写手)

snoopyzhao

至尊木虫 (职业作家)

【答案】应助回帖


涂涂木(金币+3): 2011-12-15 16:12:33
余泽成(金币+1): 辛苦了! 2011-12-31 11:01:49

yqsamallworm

铜虫 (小有名气)

【答案】应助回帖


感谢参与,应助指数 +1
余泽成(金币+1): 谢谢参与应助! 2011-12-31 11:02:01
相关版块跳转 我要订阅楼主 涂涂木 的主题更新
信息提示
请填处理意见