数学建模社区-数学中国

标题: 极限测试之Matlab与Forcal的错误（异常）处理 [打印本页]
作者: forcal    时间: 2011-8-2 18:11
标题: 极限测试之Matlab与Forcal的错误（异常）处理
这里谈不上是极限测试了，只是还借用这个名称。
) t) ~, v% m, L6 \5 `. C' O/ s2 t9 y( X% j  G
我们将通过错误处理检测经过多少次运行某个程序才能运行成功，即：通常程序运行时会出现运行错误，我们要测试一下程序运行多少次才能成功一次。
2 l: V+ \( F4 l. q" _2 H. l; N; S" z' n
在这个例子中，函数what(n,k)是这样设计的：n为大于1的整数，k为大于1的系数。生成一个长度为n的0～1之间均匀分布的随机数数组a，设m=n*k, mm=n*(k-1)/2，尝试取数组a的每一个元素a[a(i)*m-mm]，其中a(i)*m-mm是元素的下标。这样，若元素下标有效，则取值成功，否则将产生一个运行错误。; H" g* V  K) X1 ]" M4 f
+ ^7 \4 `: z3 b: K2 n9 X
例如：n=10, k=1.1，则m=11, mm=0.5，设生成的随机数如下：) R  T  O9 p8 N
0.2, 0.05, 0.97, 0.8, 0.5, 0.7, 0.6, 0.4, 0.3, 0.6
' _6 z& m7 ]# N9 M) u+ {, D7 H第1个数0.2的计算下标为：a(i)*m-mm＝0.2*11-0.5＝1.7，下标取整后为1，则这个下标是有效的；; Z3 ?% T& r# A- t4 r, q
第2个数0.05的计算下标为：a(i)*m-mm＝0.05*11-0.5＝0.05，下标取整后为0，则这个下标是有效的；7 d! L$ L$ d* n' W" `
第3个数0.97的计算下标为：a(i)*m-mm＝0.97*11-0.5＝10.17，下标取整后为10，则这个下标是无效的；7 W5 w" M: ~: b  ~7 B: S
以此类推。
8 U$ k# B, f+ _$ {% }
9 j  v6 q+ b' Y* [" u主函数main中有一个循环，不断执行what[100,1.1]，然后检测运行错误，若出现运行错误且出错函数名为math:get，说明是函数what()中的元素下标出错，则清除运行错误，继续循环，直至函数what()运行成功，或者出现非math:get给出的运行错误（例如，用户终止程序运行产生的运行错误），变量i统计运行了多少次才成功了一次。+ I- ]1 E- F% F2 i: P7 s" j! N" g
2 Y7 c) c" ]+ M; D! X
Forcal程序：
  1. !using["math","string"];) J/ i1 @' Q% j
  2. what(n,k:a,i,m,mm)=! w) p' G' @6 v: ?" @2 ?
  3.   oo{a = rand(n,1).reshape()}, m=n*k, mm=n*(k-1)/2,5 Y+ Z6 S  L' H& y
  4.   i=0, while{i<n, a[a(i)*m-mm], i++};
    + j& _) O* F: L1 y# Z
  5. 1 T" ~8 \/ ]. X) D  A/ e' I
  6. main(:i,ErrType,FunName,FunNameLen)=) K( a% C& q: f# X) r1 a
  7.   FunName="\[80]", FunNameLen=80,
    : s' ^! M  ~  {+ S" X( B2 N3 U
  8.   i=0,
    2 R: N: F! t/ m# g) x7 q6 X( a
  9.   while{1,# c  o6 m, D' z, J
  10.     i++,
    5 Z. m! d4 U8 R6 |4 t5 I9 q1 L
  11.     what[100,1.1],          //这个函数运行时可能返回运行错误
    5 q1 i0 ~( j( Y2 i
  12.     geterr(&ErrType,FunName,FunNameLen,0,0,0),  //获取Forcal运行错误
    : v  N. h; @' m5 A  |- S/ |
  13.     if{!ErrType, break()},  //what正常运行，退出5 H1 w5 X3 m: n8 z" J1 P3 b
  14.     oo{if{wcscmp[ws(FunName),ws("math::oget")], break()}},  //不是函数math::oget给出的运行错误，退出1 Q) F( m/ g1 c
  15.     clearerr()              //清除Forcal运行错误
    2 E% y& D& V6 p/ f; J! `
  16.   },+ b( K' ~; R7 [- R3 |( s
  17.   i;
复制代码
多次运行，一些可能的结果如下：
7 w3 t. m: @7 N. P+ H1518.
: F' e  ~$ F8 k448.
; ~3 g( _& K/ [$ m% b1518.
2 N) J5 E' A1 j: }448.0 l, L. s3 |: b# `
4795.: E( s7 i5 i; V  t0 m! k
448.
( y# j+ I) e0 r/ s5 J% d* X9 K# P1518.( `9 [* l) z! i3 v9 G: z% D9 X. L
448.
$ A& i1 d, u# Q  c( v3 m* u/ ?1518.! D  q. \4 X8 `
3725.
; h1 m8 z4 \9 @: v6 }- T1518.; y( P. u7 \- ~2 q/ V! V( [
448.( _8 d6 z5 w1 f, h  n- a
: z/ y2 S1 n: y" J/ F/ r
对matlab的异常处理不熟悉，哪位朋友有兴趣给出此例的matlab版本？谢谢！
作者: 刘石秀    时间: 2012-1-10 22:31
新手帮忙顶一下
作者: alair005    时间: 2012-2-7 12:36
看看，肯定能学到不少东西~！~！~@！~！~！~！~380801145722368



欢迎光临 数学建模社区-数学中国 (http://www.madio.net/) Powered by Discuz! X2.5