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