#include "genocop.h"/********************************************************************************//*                                                                              *//*           FUNCTION NAME     :   print_equalities()                           *//*                                                                              *//*           SYNOPSIS          :   void print_equalities(equal,t_var,t_equ,     *//*                                                                   coeff,rhs) *//*                                                                              *//*           DESCRIPTION       :   This function prints the matrix passed, on to*//*                                  the standard output, in the format of       *//*                                  equalities.                                 *//*                                                                              *//*           FUNCTIONS CALLED  :   None                                         *//*                                                                              *//*           CALLING FUNCITONS :   main()                                       *//*                                                                              *//*           AUTHOR            :   Swarnalatha Swaminathan                      *//*                                                                              *//*           DATE              :   1/17/92                                      *//*                                                                              *//*                                                                              *//*           REV            DATE            BY           DESCRIPTION            *//*           ---            ----            --           -----------            *//*                                                                              *//*                                                                              *//********************************************************************************/void print_equalities(equal, t_var, t_equ, coeff, rhs)    MATRIX          equal;		    /* the equalities matrix */    VECTOR          rhs;		    /* the right hand side of the					     * equalities */    int             t_var,		    /* the total number of variables */                    t_equ;		    /* the total number of equalities */    IVECTOR         coeff;		    /* the coefficient vector */{    int             i, j, flag = 0;/*    fprintf(output, "\n\nEqualities :\n");  */    for (i = 1; i <= t_equ; i++)    {	flag = 0;	for (j = 1; j <= t_var + 1; j++)	{	    if ((flag == 0) && (equal[i][j] != 0.0))	    {		fprintf(output, " %3.2fX%d", equal[i][j], coeff[j]);		flag = 1;	    } else if (j == t_var + 1)		fprintf(output, "  =  %3.2f\n", rhs[i]);	    else if (equal[i][j] < 0.0)		fprintf(output, " - %3.2fX%d", fabs(equal[i][j]), coeff[j]);	    else if (equal[i][j] > 0.0)		fprintf(output, " + %3.2fX%d", fabs(equal[i][j]), coeff[j]);	}    }}/********************************************************************************//*                                                                              *//*           FUNCTION NAME     :   print_inequalities()                         *//*                                                                              *//*           SYNOPSIS          :   void print_inequalities(equal,t_var,t_equ,   *//*                                                              coeff,ineq_rhs) *//*                                                                              *//*           DESCRIPTION       :   This function prints the matrix passed, on to*//*                                  the standard output, in the format of       *//*                                  inequalities.                               *//*                                                                              *//*           FUNCTIONS CALLED  :   None                                         *//*                                                                              *//*           CALLING FUNCITONS :   main()                                       *//*                                                                              *//*           AUTHOR            :   Swarnalatha Swaminathan                      *//*                                                                              *//*           DATE              :   1/17/92                                      *//*                                                                              *//*                                                                              *//*           REV            DATE            BY           DESCRIPTION            *//*           ---            ----            --           -----------            *//*                                                                              *//*                                                                              *//********************************************************************************/void print_inequalities(equal, t_var, t_equ, coeff, ineq_rhs)    MATRIX          equal;		    /* the inequalities matrix */    VECTOR          ineq_rhs;		    /* the right hand side of the					     * inequalities */    int             t_var,		    /* the total number of variables */                    t_equ;		    /* the total number of					     * inequalites */    IVECTOR         coeff;		    /* the coefficient vector of					     * ineqaulites */{    int             i, j, flag = 0;    fprintf(output, "\n\nLinear inequalities :\n");    for (i = 1; i <= t_equ; i++)    {	flag = 0;	for (j = 1; j <= t_var + 1; j++)	{	    if ((flag == 0) && (equal[i][j] != 0.0))	    {		fprintf(output, " %3.2fX%d", equal[i][j], coeff[j]);		flag = 1;	    } else if (j == t_var + 1)		fprintf(output, " <=  %3.2f\n", ineq_rhs[i]);	    else if (equal[i][j] < 0.0)		fprintf(output, " - %3.2fX%d", fabs(equal[i][j]), coeff[j]);	    else if (equal[i][j] > 0.0)		fprintf(output, " + %3.2fX%d", fabs(equal[i][j]), coeff[j]);	}    }}/********************************************************************************//*                                                                              *//*           FUNCTION NAME     :   print_domains()                              *//*                                                                              *//*           SYNOPSIS          :   void print_domains(equal,t_equ)              *//*                                                                              *//*           DESCRIPTION       :   This function prints the matrix passed, on to*//*                                  the standard output, in the format of       *//*                                  domains.                                    *//*                                                                              *//*           FUNCTIONS CALLED  :   None                                         *//*                                                                              *//*           CALLING FUNCITONS :   main()                                       *//*                                                                              *//*           AUTHOR            :   Swarnalatha Swaminathan                      *//*                                                                              *//*           DATE              :   1/17/92                                      *//*                                                                              *//*                                                                              *//*           REV            DATE            BY           DESCRIPTION            *//*           ---            ----            --           -----------            *//*                                                                              *//*                                                                              *//********************************************************************************/void print_domains(equal, t_equ)    MATRIX          equal;		    /* the domains matrix, with the					     * upper and lower limits */    int             t_equ;		    /* the total number of domains */{    int             i, j, temp;    fprintf(output, "\n\nDomains :\n");    for (i = 1; i <= t_equ; i++)    {	for (j = 1; j <= 3; j++)	{	    if (j == 2)		fprintf(output, "  <=  X%-2d  <=   ", (int) equal[i][j]);	    else		fprintf(output, " %3.2f ", equal[i][j]);	}	fprintf(output, "\n");    }}/********************************************************************************/