anchor.diff:  Original = lists:map(fun({B,C})->{binary_to_list(B),binary_to_list(C)} end,element(2,hd(tl(V)))),
   StingConverted = [ {X,list_to_binary(Y)} || {X,Y} <- Original ],
   mochijson2:encode(StingConverted).
  +
  +getGridJSON(M,Z,X,Y)->
  +lists:append(getGrid(M,Z,X,Y),getKey(M,Z,X,Y)).
   
   getKey(M,Z,X,Y)->
   {ok, Db} = sqlite3:start_link(m,[{file, filename:join([filename:absname(""),"tiles",lists:concat([M, ".mbtiles"])])}]),
  
positive.code: 
  start(Port) ->
  	misultin:start_link([{port, Port}, {loop, fun(Req) -> handle_http(Req) end}]).
  
  start() ->start(7027).
  stop() ->
  	misultin:stop().
  
negative.code: -module(kublai).
  -compile(export_all).
  getTile(M,Z,X,Y)->
  Db = element(2,sqlite3:start_link(m,[{file, filename:join([filename:absname(""),"tiles",lists:concat([M, ".mbtiles"])])}])),
  [{columns,["tile_data"]},{rows,[{{blob,Tile}}]}] = sqlite3:sql_exec(Db, lists:concat(["SELECT tile_data FROM tiles WHERE zoom_level = ", Z, " AND tile_column = ", X, " AND tile_row = ", Y])),
  sqlite3:close(Db),
  Tile.
  