inspect应该不是这么用的,不知道你要解决什么问题,如果是要本程序内判断ci的大小,用if-else就可以了。如果ci不是本程序的,需要调用此程序时,可以用inspect,用法如下:6 Y' m2 ]+ \ U+ X# E) ^
(number : integer)1 w1 ?" m; D t2 u' H7 n
is: c* ~" W6 T$ z
do $ G. m) F# Y. t) m inspect number # g* I* w4 D- H when 1 then % V5 P" C+ I5 B3 t print "not a prime number" 2 s6 T" Z P- _: c2 p when 2,5,7,3 then . G& a1 {9 b. w
print "prime number" ' D1 } `! s: V1 g7 k& }8 @( _ when 9,4 then $ d% U" a \2 X: a Q print "square number"# Z0 _7 V0 h/ b7 T# h; Y% B
else " k; c1 X, M O9 ~- c- ]) V print "no special number"; 6 y# ^: T% [) M5 k# [5 s) V print "or number greater than 9"; T- }4 J. M7 K8 o1 ?! J9 l end; * i6 l" n- S# `, Y8 O3 Hend;