| version 1.13, 2006/08/27 22:17:28 |
version 1.14, 2013/12/20 02:02:24 |
|
|
| /* $OpenXM: OpenXM_contrib2/asir2000/io/pexpr_body.c,v 1.12 2006/04/16 00:51:14 noro Exp $ */ |
/* $OpenXM: OpenXM_contrib2/asir2000/io/pexpr_body.c,v 1.13 2006/08/27 22:17:28 noro Exp $ */ |
| |
|
| #define PRINTHAT (fortran_output?PUTS("**"):PUTS("^")) |
#define PRINTHAT (fortran_output?PUTS("**"):PUTS("^")) |
| |
|
|
|
| PUTS("/"); |
PUTS("/"); |
| PRINTN(NM(dn)); |
PRINTN(NM(dn)); |
| } |
} |
| |
break; |
| |
case N_GZ: |
| |
mpz_out_str(OUT,10,BDY((GZ)q)); |
| |
break; |
| |
case N_GQ: |
| |
mpq_out_str(OUT,10,BDY((GQ)q)); |
| break; |
break; |
| } |
} |
| } |
} |
![[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