let genGtype (id: ide) (t: gType) (table: dec_table) (ic: intermediateCode) (b: bool): unit = match t with
        Basic(bt)       ->  Hashtbl.add table id (genBtype 1 1 bt ic b)
      | Vector(x,bt)    ->  (for index=(x-1) downto 0 do (Hashtbl.add table id (genBtype index x bt ic b)) done)
      | Matrix(x,y,bt)  ->  (for index=(x*y-1) downto 0 do (Hashtbl.add table id (genBtype index x bt ic b)) done)