function UpdatedOutArg = ...
   FA_GetOutArgInfo(InArg,NInArg,OutArg,NOutArg,SharedInfo,FunPrecSpecifier, ...
        FunTypeAnnot,FunSizeAnnot,ReportFileName,ASTFunName)
// function UpdatedOutArg = ...
//    FA_GetOutArgInfo(InArg,NInArg,OutArg,NOutArg,SharedInfo,FunPrecSpecifier,FunTypeAnnot,FunSizeAnnot,ReportFileName)
// -----------------------------------------------------------------
// #RNU_RES_B
// InArg is used by eval don't remove it from the function call.
//
// #RNU_RES_E
// Input data:
// //NUT: Add description here
//
// Output data:
// //NUT: Add description here
//
// Status:
// 25-Oct-2007 -- Raffaele Nutricato: Author.
//
// Copyright 2007 Raffaele Nutricato.
// Contact: raffaele.nutricato@tiscali.it
// -----------------------------------------------------------------

// ------------------------------
// --- Check input arguments. ---
// ------------------------------
SCI2CNInArgCheck(argn(2),10,10);
// -----------------------
// --- Initialization. ---
// -----------------------


UpdatedOutArg   = OutArg;
for cntin = 1:NInArg
   IN(cntin).TP    = InArg(cntin).Type;
   for _InArgSize=1:size(InArg(cntin).Size, '*')
     IN(cntin).SZ(_InArgSize) = InArg(cntin).Size(_InArgSize);
   end
   if ((isnan(InArg(cntin).Value)) & (GetSymbolDimension(InArg(cntin).Size) == 0))
      // #RNU_RES_B
      // IN(cntin).VAL = '__SCI2CNANSIZE'; //RNU: toglimi
      //RNU: Replace the value of the variable with its name, in case it is a scalar variable.
      // #RNU_RES_E
      IN(cntin).VAL = InArg(cntin).Name;
   else
      IN(cntin).VAL = string(InArg(cntin).Value);
   end
end
DefaultPrecision = SharedInfo.DefaultPrecision;
// ---------------------------
// --- End Initialization. ---
// ---------------------------
if (FunTypeAnnot(1) == '')
   NOutArg = 0;
   
else
   NOutArg = max(size(FunTypeAnnot));
end

flagfindlike = 0;

for counterin = 1:NInArg
   if (InArg(counterin).FindLike == 1 | InArg(counterin).FindLike == -1)
      // #RNU_RES_B
      // Then we must assume that the output will be findlike
      // 0 = no find-like
      // 1 = pure find-like
      //-1 = similar to find-like (out=fun(in)) where in is find-like.
      // #RNU_RES_E
      flagfindlike = -1;
   end
end

for counterout = 1:NOutArg
   if(FunTypeAnnot == 'FA_TP_USER')
      UpdatedOutArg(counterout).Type   = FA_TP_USER(FunPrecSpecifier,DefaultPrecision);
   else
      UpdatedOutArg(counterout).Type   = eval(FunTypeAnnot(counterout));
   end
   UpdatedOutArg(counterout).FindLike  = 0;

   // This is just to remove the FA_SZ_RTMAX tag ???
   lengthFA_SZ_RTMAX = length('FA_SZ_RTMAX');
   if (SCI2Cstrncmps1size('FA_SZ_RTMAX',FunSizeAnnot(counterout,1)))
      UpdatedOutArg(counterout).FindLike = 1;
      FunSizeAnnot(counterout,1) = part(FunSizeAnnot(counterout,1),lengthFA_SZ_RTMAX+1:length(FunSizeAnnot(counterout,1)));
   end

   if (SCI2Cstrncmps1size('FA_SZ_RTMAX',FunSizeAnnot(counterout,2)))
      UpdatedOutArg(counterout).FindLike = 1;
      FunSizeAnnot(counterout,2) = part(FunSizeAnnot(counterout,2),lengthFA_SZ_RTMAX+1:length(FunSizeAnnot(counterout,2)));
   end

   if (flagfindlike == -1)
      UpdatedOutArg(counterout).FindLike = -1;
   end

   // #RNU_RES_B
   // When the size is given by e IN(x).VAL  annotation we can have two cases:
   // IN(x).VAL is a number or IN(x).VAL is %nan. When it is %nan the
   // size is equal to the name of IN(x).
   // This is a dynamic memory extension of a local variable and for the moment
   // we issue an error according to SCI2C specifications
   // #RNU_RES_E
   //disp(FunSizeAnnot(2),FunSizeAnnot(1))
	//Ukasha
//	if ASTFunName == svd
//		x=1;
//		for i=1:InArg(1).Size(1)
//			for j=1:InArg(1).Size(2)
//				A(i)(j)=InArg(1).Value(x);
//			end
//		end
//		[U,S,V]=svd(A,"e");
			

 
   for iterOutputPosition=1:size(FunSizeAnnot, 'c')
     tmpeval = eval(FunSizeAnnot(counterout, iterOutputPosition));
     if (IsNanSize(tmpeval))
       if SharedInfo.ForExpr.OnExec == 0
         EM_NanSize(ReportFileName);
       else
         UpdatedOutArg(counterout).Size(iterOutputPosition) = string(tmpeval);
       end
     elseif(isnum(tmpeval))
       if (eval(tmpeval) <= 0)
         EM_ZeroSize(ReportFileName);
       else
         UpdatedOutArg(counterout).Size(iterOutputPosition) = string(tmpeval);
       end
     else
       UpdatedOutArg(counterout).Size(iterOutputPosition) = string(tmpeval);
     end
   end
   if(ASTFunName == 'syslin')
    no_of_st = eval(InArg(2).Size(1))
    no_of_ip = eval(InArg(3).Size(2))
      UpdatedOutArg(counterout).Value     = no_of_st+no_of_ip*0.1;
   else 
      UpdatedOutArg(counterout).Value     = %nan;
   end
   UpdatedOutArg(counterout).Dimension = GetSymbolDimension(UpdatedOutArg(counterout).Size);
   UpdatedOutArg(counterout).Scope     = 'Temp';//NUT anche su questo si puo' ragionare verifica anche la handleoperation.
end
endfunction