Square Cross Section: Step 4

Step 4 is to construct the top. The command is Surface[u*t + (1 - u) t, u 0 + (1 - u) f(t), u f(t) + (1 - u) f(t), u, 0, 1, t, 1, 5]