Return to drivers_for_path_directions.ads CVS log

Up to [local] / OpenXM_contrib / PHC / Ada / Continuation

Annotation of OpenXM_contrib/PHC/Ada/Continuation/drivers_for_path_directions.ads, Revision 1.1.1.1

1.1       maekawa     1: with text_io;                            use text_io;
                      2: with Standard_Complex_Numbers;           use Standard_Complex_numbers;
                      3: with Standard_Floating_Vectors;          use Standard_Floating_Vectors;
                      4: with Standard_Floating_VecVecs;          use Standard_Floating_VecVecs;
                      5: with Standard_Complex_Solutions;         use Standard_Complex_Solutions;
                      6:
                      7: package Drivers_for_Path_Directions is
                      8:
                      9: -- DESCRIPTION :
                     10: --   This package provides driver routines for the computation of the
                     11: --   direction of the solution paths.
                     12:
                     13:   procedure Init_Path_Directions
                     14:                ( n,nv : in natural; v : in out Link_to_VecVec;
                     15:                  errv : in out Link_to_Vector );
                     16:
                     17:   -- DESCRIPTION :
                     18:   --   Initializes the data for path directions.
                     19:
                     20:   -- ON ENTRY :
                     21:   --   n         dimension of the solution vectors;
                     22:   --   nv        number of solution paths.
                     23:
                     24:   -- ON RETURN :
                     25:   --   v         nv zero vectors of range 1..n;
                     26:   --   errv      nv entries equal to 1.0.
                     27:
                     28:   procedure Toric_Continue
                     29:                ( file : in file_type; sols : in out Solution_List;
                     30:                  proj,report : in boolean; v : in out VecVec;
                     31:                  errv : in out Vector; target : in Complex_Number );
                     32:
                     33:   -- DESCRIPTION :
                     34:   --   Performs the continuation with computation of path directions.
                     35:
                     36:   procedure Write_Directions
                     37:                ( file : in file_type; v : in VecVec; errv : in Vector );
                     38:
                     39:   -- DESCRIPTION :
                     40:   --   Writes the directions of the paths with their errors to the file.
                     41:
                     42: end Drivers_for_Path_Directions;