how to test where a list contains constant(s) or not
- To: mathgroup at smc.vnet.net
- Subject: [mg91965] how to test where a list contains constant(s) or not
- From: Aya <sh_liuhuashan at 163.com>
- Date: Mon, 15 Sep 2008 03:41:28 -0400 (EDT)
case1: { a, b, c, Pi } gives true because of Pi case2: { a, b, c, 0.0001} gives true because of 0.0001 case3: { a, b, c, 2 + Pi I } gives ture becase of 2 + Pi I case4: { a, b, c} gives false is this function right ? ComplexQ[z_] := NumericQ[ z ] || ( NumericQ[ z ] && SameQ[ Head[ z ], Complex] ) IsConstantsIn[ lstList_ ] := Module[ { intLength }, intLength = Length@Select[ lstList, ComplexQ[ # ]& ]; If[ intLength > 0, Return[ True ], Return[ False ] ]; Return[ False ]; ]