Filehost.ro - gazduire fisiere
lisp2arx
Visual Programming for AutoLisp Mathématiques en programmation Lisp.. doc2cpp,doc2lsp, sld2lsp, bmp2dcl, free__GifCcapture for all-CAD'platforms..
Nou pe simpatie:
Bianca777
Femeie
24 ani
Brasov
cauta Barbat
27 - 64 ani
lisp2arxReguliInregistrareLoginPozeNu sunteti logat. Lista Forumurilor Pe Tematici
lisp2arx / MacOs, WebDesign /

Clojure- How to emulate defun/s from Visual-Lisp Autocad?

Pagini: 1  
#1
zauchan
Moderator
Postari: 180


Code:

(defun if_str(s386 elseuser / $rr tip) ;;_ASSERT_OK
........................
$rr)
(defun tmti_trpunct_rect_sav(fc / rr m dI c)
....................
rr)

(Defun t_ang_grad2rad(p120 / rr r)
  (dfn_pp_v1chk p120 "1real" "t_ang_grad2rad") (setq;|a331196|;
     r (t_ang_radcheck (/ (* p120 pi) 200.0))) 
...........................
rr)

(defun str_chr1a(n169 o169 q169 / rr)
  (setq;|a379465|;
     rr (if (str_l0 n169) "" (substr n169 o169 q169))) (if (=  n169 nil) (setq;|a379541|;
     rr "")) 
rr)



_______________________________________
psw: cea de la wjndowsXP gigabyte..

 
   

Topicuri similare

Pagini: 1  
Mergi la