You are an expert in writing code in many different languages. Your goal is to perform code completion for the following code, keeping in mind the rest of the code and the file meta data.
    Metadata details:
    filename: g_adimat_sol_ata.m
    path of file: ./repos/d2d/arFramework3/ThirdParty/StrucID/adimat/runtime
    
    the code of the file until where you have to start completion: % Generated by ADiMat 0.6.0-4867
% Copyright 2009-2013 Johannes Willkomm, Fachgebiet Scientific Computing,
% TU Darmstadt, 64289 Darmstadt, Germany
% Copyright 2001-2008 Andre Vehreschild, Institute for Scientific Computing,
% RWTH Aachen University, 52056 Aachen, Germany.
% Visit us on the web at http://www.adimat.de
% Report bugs to adimat-us
    
function (This flag can not be set explicitly).
% NOTMPCLEAR  -- Suppress generation of clear g_* instructions.
% UNBOUND_ERROR	-- Stop with error if unbound identifiers found (default).
% VERBOSITYLEVEL=4
% AD_IVARS= a, b
% AD_DVARS= z

% function z = adimat_sol_qr(a, b)
% 
% Solve linear system a*x = b for x by solving (a'*a)*x=a'*b which is
% always a square system, for automatic differentiation.
%
% Copyright 2013,2014 Johannes Willkomm
%
function [g_z, z]= g_adimat_sol_ata(g_a, a, g_b, b)
   g_L= g_a' ;
   L= a' ; 
   g_tmp_adimat_sol_ata_00000= g_L* a+ L* g_a;
   tmp_adimat_sol_ata_00000= L* a;
   g_tmp_adimat_sol_ata_00001= g_L* b+ L* g_b;
   tmp_adimat_sol_ata_00001= L* b;
   [g_z, z]= adimat_g_linsolve(g_tmp_adimat_sol_ata_00000, tmp_adimat_sol_ata_00000, g_tmp_adimat_sol_ata_00001, tmp_adimat_sol_ata_00001); 
   % $Id: adimat_sol_ata.m 4813 2014-10-09 07:33:03Z willkomm $

end