 Usage:  {A,V,ctrl}=iteras(A0,S1,S2,b,N,eps,itmax,expl)  

 

 Input:



  A0                     p x p; starting value for A; if 0 is entered I^{-1} is taken 

                         if p>1 and dim(A0)==1 I^{-1}*A0 is taken 

                         

  S1                     p x p; Covariance of the first (clipped) component 

                         

  S2                     p x p; Covariance of the second (unclipped) component 

                         

  b                      numeric; clipping height 

                         

  N                      integer; MC-sample size / integration grid-points 

                         

  eps                    numeric; exactitude 

                         

  itmax                  integer; maximal number of iterastions 

                         

  expl                   numeric; threshold for the changes in abs. value of A: 

                         beyond this value convergence is uncertain ~ 4 

                         

 Output:



  A                      p x p; Lagrange-Multiplyer solving (1) 

                         

  V                      p x p; corresponding Covariance 

                         

  ctrl                   integer; tells if convergence "happened" 

                         

--------------------------------------------------------------

(C) MD*TECH Method and Data Technologies, 21.9.2000

