Strange ReplaceRepeated
- To: mathgroup at smc.vnet.net
 - Subject: [mg17037] Strange ReplaceRepeated
 - From: "Arturas Acus" <acus at itpa.lt>
 - Date: Wed, 14 Apr 1999 02:11:52 -0400
 - Sender: owner-wri-mathgroup at wolfram.com
 
Dear Group, 
Here are very strange rezults from 
RplaceRepeated.
Input:
tarp=List[
    List[AuxVertex[List[List[i2],m2]],
      CG[List[i1,m1],List[i2,m2],List[i3,F[m3]]],
      WD[i1,List[List[m1],List[m2]],List[q0]]],
    List[AuxVertex[List[List[i1],m1]],
      CG[List[i1,m1],List[i2,m2],List[i3,F[m3]]],
      WD[i1,List[List[m1],List[m2]],List[q0]]]]
Now try this on Linux box:
tarp//.{F[_]:>S[Infinity],_?NumberQ:>S[Infinity]}
It rezults in infinite loop. Using TracePrint indicates, that 
somewhere integer "1" appears for which NumberQ gives True. But there
isn't '1' at all in tarp! What is happening here?
                                     
Arturas Acus
Institute of Theoretical
Physics and Astronomy
Gostauto 12, 2600,Vilnius
Lithuania 
E-mail: acus at itpa.lt
   Fax: 370-2-225361
   Tel: 370-2-612906