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; |
} |
} |
} |
} |