Nelle tesine, cercare un uso interessante di /. (pt, dicembre 2001; rev. dicembre 2002)

a = x + 3

a /. x -> 1

Non è interessante!
Invece ...

r = 
      Solve[{a11 x1 + a12 (x2^2) == b1, a21 x1 + a22 x2 == b2}, {x1, 
          x2}]

f[a11_, a12_, a21_, a22_, b1_, b2_] := 
      Evaluate[x1 /. r[[1, 
            1]]]

N[f[1, 2, 3, 4, 5, 6]]