add rect and polar methods to CTPSA in Lua

Author: ldeniau

src/madl_gtpsa.mad

@@ -1500,6 +1500,16 @@ function MC.carg (x, r)
   _C.mad_ctpsa_carg(x, r) return r
 end
 
+function MC.rect (x, r)
+  r = chksiz(r,x) or ctpsa_alloc(x.d, x.mo)
+  _C.mad_ctpsa_rect(x, r) return r
+end
+
+function MC.polar (x, r)
+  r = chksiz(r,x) or ctpsa_alloc(x.d, x.mo)
+  _C.mad_ctpsa_polar(x, r) return r
+end
+
 function MC.unit (x, r)
   r = chksiz(r,x) or ctpsa_alloc(x.d, x.mo)
   _C.mad_ctpsa_unit(x, r) return r