投稿されたすべてのコード一覧
% can_unify/2 % 「can_unify(X, Y) が成功する」⇔「X = Y が成功する」、ただし単一化は行われない。 can_unify(X, Y) :- setof(Z, (Z = X, X = Y), [_|_]).
% テストデータ ls([a:1, a:1, a:2, b:2]). % 定義1 - 等号の失敗を使って排除 remove_v1(_, [], []).
// TaskDialog.hsp // TaskDialog Sample by akk026 #uselib "comctl32.dll"
#defcfunc GetAuthorizeAdress // アクセストークン取得 sdim Argument RESTAPI ResponseBody, ResponseHeader, METHOD_GET, "oauth/request_token", Argument if stat != 200 : return "Error"
; masm64 (x64) ;.686 ;.mmx ;.xmm ;.model flat