controllo9a 
(* costante locale e With *)

t2=17
w[x1_]:=With[{t2=x1+1},t2+t2^3]
w[m]
t2
(* valore iniziale con With *)

t2=17
With[{t2=t2+1},t2^2]
(* valori locali e uso di Block *)

x=.
x^2+3
Block[{x=m+1},%]
x
(* valori locali e funzioni con Block *)

t=17
fx[x_]:=x^2+t
fx[m]
Block[{t=2},fx[m]]

torna a inizio