]> www.ginac.de Git - cln.git/blob - src/base/output/cl_prin_globals.cc
Initial revision
[cln.git] / src / base / output / cl_prin_globals.cc
1 // Global variables in CLN
2
3 // General includes.
4 #include "cl_sysdep.h"
5
6 CL_PROVIDE(cl_prin_globals)
7
8 // Specification.
9 #include "cl_output.h"
10
11
12 // Implementation.
13
14 cl_print_flags cl_default_print_flags;
15 #if 0 // The default constructors already do this.
16 AT_INITIALIZATION(cl_default_print_flags)
17 {
18         cl_default_print_flags.rational_base = 10;
19         cl_default_print_flags.rational_readably = cl_false;
20         cl_default_print_flags.float_readably = cl_false;
21         cl_default_print_flags.default_float_format = cl_float_format_ffloat;
22         cl_default_print_flags.complex_readably = cl_false;
23         cl_default_print_flags.vector_syntax = vsyntax_pretty;
24         cl_default_print_flags.univpoly_varname = "x";
25 }
26 #endif
27
28 CL_PROVIDE_END(cl_prin_globals)