X-Git-Url: https://ncurses.scripts.mit.edu/?p=ncurses.git;a=blobdiff_plain;f=doc%2Fhtml%2Fada%2Fterminal_interface-curses-text_io-complex_io__ads.htm;fp=doc%2Fhtml%2Fada%2Fterminal_interface-curses-text_io-complex_io__ads.htm;h=7abdb640818320fed83264f424badcd5be991013;hp=78bb8c454885f115334eb73c26868f76028f9ca5;hb=47d2fb4537d9ad5bb14f4810561a327930ca4280;hpb=c55d387cebf1cee4757ca2c2ef4fbeae59ee4175;ds=sidebyside
diff --git a/doc/html/ada/terminal_interface-curses-text_io-complex_io__ads.htm b/doc/html/ada/terminal_interface-curses-text_io-complex_io__ads.htm
index 78bb8c45..7abdb640 100644
--- a/doc/html/ada/terminal_interface-curses-text_io-complex_io__ads.htm
+++ b/doc/html/ada/terminal_interface-curses-text_io-complex_io__ads.htm
@@ -24,7 +24,8 @@
-
+
+
@@ -52,37 +53,37 @@
-
+
with Ada.Numerics.Generic_Complex_Types;
generic
- with package Complex_Types is new Ada.Numerics.Generic_Complex_Types (<>);
+ with package Complex_Types is new Ada.Numerics.Generic_Complex_Types (<>);
-package Terminal_Interface.Curses.Text_IO.Complex_IO is
+package Terminal_Interface.Curses.Text_IO.Complex_IO is
use Complex_Types;
- Default_Fore : Field := 2;
- Default_Aft : Field := Real'Digits - 1;
- Default_Exp : Field := 3;
+ Default_Fore : Field := 2;
+ Default_Aft : Field := Real'Digits - 1;
+ Default_Exp : Field := 3;
- procedure Put
- (Win : Window;
- Item : Complex;
- Fore : Field := Default_Fore;
- Aft : Field := Default_Aft;
- Exp : Field := Default_Exp);
+ procedure Put
+ (Win : Window;
+ Item : Complex;
+ Fore : Field := Default_Fore;
+ Aft : Field := Default_Aft;
+ Exp : Field := Default_Exp);
- procedure Put
- (Item : Complex;
- Fore : Field := Default_Fore;
- Aft : Field := Default_Aft;
- Exp : Field := Default_Exp);
+ procedure Put
+ (Item : Complex;
+ Fore : Field := Default_Fore;
+ Aft : Field := Default_Aft;
+ Exp : Field := Default_Exp);
private
pragma Inline (Put);
-end Terminal_Interface.Curses.Text_IO.Complex_IO;
+end Terminal_Interface.Curses.Text_IO.Complex_IO;