HomeSort by: relevance | last modified time | path
    Searched refs:realpart (Results 1 - 3 of 3) sorted by relevancy

  /xsrc/external/mit/xedit/dist/lisp/
math.c 530 complex realpart &optional imagpart
533 LispObj *realpart, *imagpart; local
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
580 realpart = OCXR(number);
587 return (COMPLEX(realpart, imagpart))
    [all...]
lisp.c 244 {LispFunction, Lisp_Complex, "complex realpart &optional imagpart"},
478 {LispFunction, Lisp_Realpart, "realpart number"},
2794 LispNewComplex(LispObj *realpart, LispObj *imagpart)
2799 complexp = Lisp__New(realpart, imagpart);
2805 complexp->data.complex.real = realpart;
  /xsrc/external/mit/xedit/dist/lisp/test/
math.lsp 968 (test -1 #'realpart #c(-1 0.5d0))

Completed in 9 milliseconds