First I got load function/s inside pp_topoxcad.lsp,
-->after I load entire program.lisp.
How to count number of argument?>
E.g (sudowget "dfn_var_isdefun") --> 1
(sudowget "The function is undefined") -->(-1978)
(Defun dfn_var_isdefun (a111 / rr ao bo co) ;_ASSERT_OK
(setq co (type a111) bo (quote STR)
a111 (if (= bo co) (eval (read a111)) a111)
bo (quote SYM) a111 (if (= bo co) (eval a111) a111)
co (type a111) ao (type dfn_var_isdefun)
rr (if (= co ao) 1 0))
(if (< rr 1) (setq ao (quote SUBR) rr (if (= co ao) 2 rr)))
(if (< rr 1) (setq ao (quote USUBR) rr (if (= co ao) 3 rr)))
rr)
"lsp_var_islista":L=NotFound
"poalr":L=NotFound
"pp_cads_detaspara_trigtriunghibvls":L=NotFound
"const_dxfpointlist":L=NotFound
"str_trimlefteft":L=NotFound
"pp_purge_linebackpline_multe":L=NotFound
"pp_util_dupdelbw":L=NotFound
"pp_util_blockreplace_sbdd":L=NotFound
"dfn_dcl_i_savea":L=NotFound
"pp_cads_gknomec_a4":L=NotFound
"acad_strlsort":L=NotFound("0" nil nil nil)