anchor.diff:  %%
   %% @end
   field_value_exists_test() ->
  -    Json1 = 
  -	"{"
  -	"\"name\":\"Name1\","
  -	"\"friends\": ["
  -	"{\"name\":\"FriendName1\", \"nickname\":\"NickName1\"},"
  -	"{\"name\":\"FriendName2\", \"nickname\":[\"NickName2\", \"NickName3\"]},"
  -	"{\"name\":\"FriendName3\", \"nickname\":[\"NickName4\", \"NickName5\"]}"
  -	"]"
  -	"}",
  -
  -    Json2 = 
  -	"{"
  -	"\"name\":\"Name1\","
  -	"\"friends\": ["
  -	"{\"name\":\"FriendName2\", \"nickname\":[\"NickName2\", \"NickName3\"]}"
  -	"]"
  -	"}",
  -    ?assertEqual(true, lib_json:field_value_exist(Json1, "friends[1].name", "FriendName2")),
  -
  -    ?assertEqual(false, lib_json:field_value_exist(Json1, "friends[0].name", "FriendName2")),
  -
  -    ?assertEqual(true, lib_json:field_value_exist(Json1, "friends[*].nickname", "NickName1")),
  -
  -    ?assertEqual(true, lib_json:field_value_exist(Json1, "friends[*].nickname", "NickName3")),
  -
  -    ?assertEqual(false, lib_json:field_value_exist(Json1, "friends[*].name", "NickName3")),
  -
  -    ?assertEqual(false, lib_json:field_value_exist(Json2, "friends[*].name", "NickName3")),
  -
  -    ?assertEqual(true, lib_json:field_value_exist(Json2, "friends[*].nickname", "NickName3")),
  -
  -    ?assertEqual(true, lib_json:field_value_exist(Json1, "friends[0]", [{"name", "FriendName1"}, {"nickname", "NickName1"}])),
  -
  -    Result9 = [
  -	       [{"name","FriendName1"},{"nickname","NickName1"}],
  -	       [{"name","FriendName2"},{"nickname",["NickName2","NickName3"]}],
  -	       [{"name","FriendName3"},{"nickname",["NickName4","NickName5"]}]	       
  -	      ],
  -    ?assertEqual(true, lib_json:field_value_exist(Json1, "friends", Result9)).
  +    ?assertEqual(true, lib_json:field_value_exist(?JSON1, "friend[1].name", "FriendName2")),
  +    ?assertEqual(false, lib_json:field_value_exist(?JSON1, "friend[0].name", "FriendName2")),
  +    ?assertEqual(true, lib_json:field_value_exist(?JSON1, "friend[*].nickname", "NickName1")),
  +    ?assertEqual(true, lib_json:field_value_exist(?JSON1, "friend[*].nickname", "NickName3")),
  +    ?assertEqual(false, lib_json:field_value_exist(?JSON1, "friend[*].name", "NickName3")),
  +    ?assertEqual(false, lib_json:field_value_exist(?JSON2, "friend[*].name", "NickName3")),
  +    ?assertEqual(true, lib_json:field_value_exist(?JSON2, "friend.nickname", "NickName3")),
  +    ?assertEqual(true, lib_json:field_value_exist(
  +			 ?JSON1, "friend[0]", 
  +			 [{"name", "FriendName1"}, {"nickname", "NickName1"}]
  +			)),
  +    ?assertEqual(true, lib_json:field_value_exist(?JSON1, "friend", ?GET_FIELD_RESULT1)).
   
   %% @doc
   %% Function: encode_test/0
  
positive.code: 	     {friend, {{name, "FriendName2"}, {nickname, ["NickName2", "NickName3"]}}}
  	    },
  
      Result1 = 
  	[$\{,[$\", <<"name">>,$\"],$:,[$\",<<"Name1">>,$\"],$,,[$\",<<"friends">>,$\"],$:,[$[,[${,[$\",<<"name">>,$\"],$:,[$\",<<"FriendName1">>,$\"],$,,[$\",<<"nickname">>,$\"],$:,[$\",<<"NickName1">>,$\"],$}],$,,[${,[$\",<<"name">>,$\"],$:,[$\",<<"FriendName2">>,$\"],$,,[$\",<<"nickname">>,$\"],$:,[$[,[$\",<<"NickName2">>,$\"],$,,[$\",<<"NickName3">>,$\"],$]],$}],$]],$}],
  
      ?assertEqual(Result1, lib_json:encode(Json1)),
  
  
      Result2 = 
  	"{"
  	"\"name\":\"Name1\","
  	  "\"friend\": ["
  	  "{\"name\":\"FriendName1\", \"nickname\":\"NickName1\"},"
  	  "{\"name\":\"FriendName2\", \"nickname\":[\"NickName2\", \"NickName3\"]}"
  	  "]"
  	  "}",
  	  ?assertEqual(Result2, lib_json:encode({non_mochi, Json2})),
  	  
      Result3 = 
  	"{"
  	  "\"name\":\"Name1\","
  	  "\"friends\": ["
  	  "{\"name\":\"FriendName1\", \"nickname\":\"NickName1\"},"
  	  "{\"name\":\"FriendName2\", \"nickname\":[\"NickName2\", \"NickName3\"]}"
  	  "]"
  	  "}",
  	  ?assertEqual(Result3, lib_json:encode({non_mochi, Json3})).
  
  
  %% @doc
  
negative.code: %%
  %% @end
  encode_test() ->
      Json2 = 
  	{{name, "Name1"},
  	 {friend, [{{name, "FriendName1"}, {nickname, "NickName1"}},
  