Services & Resources / Wolfram Forums / MathGroup Archive
-----

MathGroup Archive 2008

[Date Index] [Thread Index] [Author Index]

Search the Archive

Re: ReplaceAll on Nested Expressions

  • To: mathgroup at smc.vnet.net
  • Subject: [mg92934] Re: ReplaceAll on Nested Expressions
  • From: "David Park" <djmpark at comcast.net>
  • Date: Mon, 20 Oct 2008 07:34:17 -0400 (EDT)

I found one method - MapAll.

Fold[foo[#1, #2] &, a, {b, c, d, e}]
MapAll[# /. foo[a_, b_] :> foo[a, h[b]] &, %]
foo[foo[foo[foo[a, b], c], d], e]
foo[foo[foo[foo[a, h[b]], h[c]], h[d]], h[e]]

-- 
David Park
djmpark at comcast.net
http://home.comcast.net/~djmpark/  


"David Park" <djmpark at comcast.net> wrote in message news:...
> Here is an attempted replacement:
> 
> foo[foo[a, b], c] /. foo[a_, b_] :> foo[a, h[b]]
> foo[foo[a, b], h[c]]
> 
> How could I write a rule, or what method would I use so that the inner 
> foo[a,b] is also replaced?
> 
> foo[foo[a, h[b]], h[c]]
> 
> -- 
> David Park
> djmpark at comcast.net
> http://home.comcast.net/~djmpark/
> 
>


  • Prev by Date: Using Write to generate csv file
  • Next by Date: Grid Entries Font Size
  • Previous by thread: ReplaceAll on Nested Expressions
  • Next by thread: A Dynamic mess