Nested Exponentials
nest2[0]:=1
nest2[n_]:=2^(nest2[n-1])
Table[nest2[n],{n,0,4}]
Converted by
Mathematica
October 3, 2001