| version 1.14, 2013/12/20 02:02:24 |
version 1.15, 2015/08/04 06:20:45 |
|
|
| /* $OpenXM: OpenXM_contrib2/asir2000/io/pexpr_body.c,v 1.13 2006/08/27 22:17:28 noro Exp $ */ |
/* $OpenXM: OpenXM_contrib2/asir2000/io/pexpr_body.c,v 1.14 2013/12/20 02:02:24 noro Exp $ */ |
| |
|
| #define PRINTHAT (fortran_output?PUTS("**"):PUTS("^")) |
#define PRINTHAT (fortran_output?PUTS("**"):PUTS("^")) |
| |
|
|
|
| case N_A: |
case N_A: |
| PUTS("("); PRINTR(ALG,(R)BDY((Alg)q)); PUTS(")"); |
PUTS("("); PRINTR(ALG,(R)BDY((Alg)q)); PUTS(")"); |
| break; |
break; |
| #if defined(PARI) |
|
| case N_B: |
case N_B: |
| PRINTBF((BF)q); break; |
PRINTBF((BF)q); break; |
| #endif |
|
| #if defined(INTERVAL) |
#if defined(INTERVAL) |
| case N_IP: |
case N_IP: |
| case N_IntervalBigFloat: |
case N_IntervalBigFloat: |
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to pexpr_body.c CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM_contrib2 / asir2000 / io