Searched refs:realpart (Results 1 - 3 of 3) sorted by relevance

/xsrc/external/mit/xedit/dist/lisp/
H A Dmath.c530 complex realpart &optional imagpart
533 LispObj *realpart, *imagpart; local in function:Lisp_Complex
536 realpart = ARGUMENT(0);
538 CHECK_REAL(realpart);
541 return (realpart);
546 return (realpart);
548 return (COMPLEX(realpart, imagpart));
571 LispObj *number, *realpart, *imagpart; local in function:Lisp_Conjugate
580 realpart = OCXR(number);
587 return (COMPLEX(realpart, imagpar
[all...]
H A Dlisp.c244 {LispFunction, Lisp_Complex, "complex realpart &optional imagpart"},
478 {LispFunction, Lisp_Realpart, "realpart number"},
2794 LispNewComplex(LispObj *realpart, LispObj *imagpart) argument
2799 complexp = Lisp__New(realpart, imagpart);
2805 complexp->data.complex.real = realpart;
/xsrc/external/mit/xedit/dist/lisp/test/
H A Dmath.lsp968 (test -1 #'realpart #c(-1 0.5d0))

Completed in 9 milliseconds