/*
   RAS: Ajuste biproporcional de filas y columnas de una matriz.

   Escrito por Paco Goerlich.                   Versin: Septiembre/2001 (R1)
   Version RATS: RATS386 5.00

   Sintaxis

    @RAS A B C D

     A = Matriz MxN a ajustar.
     B = Vector Mx1 de suma de filas    a las que ajustar.
     C = Vector Nx1 de suma de columnas a las que ajustar.
     D = Matriz MxN ajustada.

     Opciones:

   PRINT/[NOPRINT] Imprime la matriz D.
   CVCRIT     = Criterio de convergencia en el ajuste [1E-15].
   ITERATIONS = Numero maximo de iteraciones a efectuar [100].


     Variables globales:

    %%RAS   = STRING, Version actual del procedimiento.
    %%ERROR = 1 o 0. Set to 1 if the procedure exits in error, 0 if not.


     Variables definidas por RAS:

    %ITERS       Iterations taken.
    %CONVERGED   = 1 o 0. Set to 1 if the process converged, 0 if not.
    %CVCRIT      Final convergence criterion (REAL).

******************************************************************************

   INFORMACION COMPUTACIONAL

   El procedimiento es la traduccin a RATS del correspondiente procedimiento
   escrito para GAUSS 2.1 (RAS.ARC).

   Originalmente pensado para ajustar por RAS matrices de transacciones
   intersectoriales Input-Output, sin embargo puede ser utilizado mas
   generalmente para matrices rectangulares.

   Criterio de convergencia: Maxima discrepancia entre la suma de filas y
                             columnas de D y los elementos de B y C
                             respectivamente debe ser menor que CVCRIT.
                             Implementado a traves de %TESTDIFF().

******************************************************************************

   REVISIONES

   R1: Septiembre/2001
       Actualizacion a RATS 5.00.
       Se aaden variables definidas por RATS en procesos iterativos.

*/
