Pensieve Header: An embedded Mobius band whose boundary is a rectangle; continues pensieve://2011-11/. For possible posting at http://en.wikipedia.org/wiki/Mobius_strip#M.C3.B6bius_band_with_flat_edge.

dt=2Pi/12; h=1/(2Pi);
Graphics3D[{
Opacity[0.8],
Table[
t1=t+dt; {c0,s0} = {Cos[t], Sin[t]}; {c1,s1} = {Cos[t1], Sin[t1]};
{
Polygon[{{t h,0,0},{t h,c0, s0},{t1 h,c1,s1},{t1 h,0,0}}],
Polygon[{{t h,c0, s0},{t1 h,c1,s1}, {(2Pi+t1)h,c1,s1}, {(2Pi+t)h,c0, s0}}],
Polygon[{{(2Pi+t)h,0,0},{(2Pi+t)h,c0, s0},{(2Pi+t1)h,c1,s1},{(2Pi+t1)h,0,0}}]
},
{t, 0, 2Pi-dt, dt}
],
Thickness[0.02], Green,
Line[{{0,0,0}, {4Pi h,0,0}, {4Pi h, 1,0}, {0,1,0}, {0,0,0}}]
}, Boxed -> False]

|