pload MODELING
vertex v0 0 0 0
vertex v1 10 0 0
vertex v2 10 10 0
vertex v3 0 10 0

edge e0 v0 v1
edge e1 v1 v2

beziercurve bc 4 10 10 0 10 20 0 0 20 0 0 10 0
mkedge e2 bc v2 v3

edge e3 v3 v0

wire w0 e0 e1 e2 e3

mkplane f0 w0

prism s0 f0 0 0 1