Product solutions for a Laplace equation BVP

un[x_,y_,n_]=Sin[n Pi x] Sinh[n Pi y]

Plot3D[un[x,y,1],{x,0,1},{y,0,2},PlotRange->All]