ウィルソンはロンドンに生まれた。はじめ医学を修め、1808年にイギリス東インド会社のベンガルの施設の外科医に任命された。インドに到着後、化学と冶金学の知識を買われ、カルカッタの造幣局で働き、1816年には金属分析の主任になった。その一方でサンスクリットを研究し、1811年から1832年までベンガル・アジア協会の書記をつとめた。1832年にオックスフォード大学の初代サンスクリット教授に就任したため、インドを離れてイギリスに帰った。1836年にはチャールズ・ウィルキンズをついで東インド会社図書館の司書に任命された。ウィルソンは1823年の王立アジア協会の創立時からの会員であり、1837年には理事に選ばれた。1834年に王立協会フェロー(FRS)に選出。
ホーラス・ヘイマン・ウィルソン（Horace Hayman Wilson、1786年9月26日 - 1860年5月8日）は、イギリスの東洋学者。オックスフォード大学の初代サンスクリット教授であり、またサンスクリット辞典の編纂でも知られる。
1992年に、12世細辻伊兵衛の長女と結婚し婿養子として細辻家へ。その頃の永楽屋は債務超過で、柱となる事業が無かった中、明治から昭和初期にかけて社内で1年間に100柄製作してた手ぬぐい事業部「百いろ会（ももいろかい）」の手ぬぐいの束を見てその時代を超越した作品に心打たれ復刻を決意。オリジナルの生地の開発や染色技術の研究などを行い試行錯誤の末、高品質で安定したモノづくりを構築。2000年に永楽屋初となる小売店舗を出店以降最大20店舗を出店。現在は京都のみ9店舗を展開（2017年5月現在）
付近にはかつて壱岐国府があったと考えられており、社名の「興」は「国府（こふ、こう）」の意味とされる。国府の倉の鍵である「印鑰（いんにゃく）」を保管していたことから、近世には「印鑰神社」とも呼ばれていた。境外社の壱岐総社神社は壱岐国の総社にあたる。延宝4年（1676年）、神道家橘三喜が壱岐の式内社を調査した際に、当社を式内小社「與神社」に比定した。しかし、これは興と與（与）を見誤ったためと考えられており、近年の研究では、式内名神大社の「天手長男神社」が当社であり、壱岐国一宮であったとする説が有力となっている。延宝4年の調査の際に、天手長男神社は壱岐市内の郷ノ浦町田中触の若宮社に比定され、壱岐国一宮の称もその神社に移ったが（現 天手長男神社）、それ以降も当社を「一の宮」と呼ぶ通称は残った。明治9年（1876年）12月に村社に列し、明治40年7月に神饌幣帛料供進神社に指定された。
n以下の全ての素数をリストに集める。エラトステネスの篩を述語として定義し、これを呼び出す。最初の述語 n以下の素数 の冒頭で、2から始まりnまで連続する整数のリストを組込述語 findall と between を使って生成する。代表的な生成パターンである。このリストを対象に小さい順に素数を探し、その素数の倍数をリストから削除して再帰的にエラトステネスの篩は実行される。n以下の素数(_n以下,_n以下の全ての素数) :-        findall(_数,between(2,_n以下,_数),_2以上_n以下の数リスト),        エラトステネスの篩(_2以上_n以下の数リスト,_n以下の全ての素数).エラトステネスの篩([],[]) :- !.エラトステネスの篩([A|R1],[A|R2]) :-        エラトステネスの篩(A,R1,L),        エラトステネスの篩(L,R2).エラトステネスの篩(_,[],[]) :-!.エラトステネスの篩(N,[A|R1],R2) :-        0 is A mod N,        エラトステネスの篩(N,R1,R2),!.エラトステネスの篩(N,[A|R1],[A|R2]) :-        エラトステネスの篩(N,R1,R2).エラトステネスの篩 の定義の中で findall　を使うと エラトステネス/3 は実は不要である。エラトステネスの篩([],[]).エラトステネスの篩([M|R1],[M|R2]) :-        findall(N,(                    member(N,R1),                    \+(0 is N mod M)),                L),        エラトステネスの篩(L,R2).どちらの定義が読みやすいかについては、常に問題となる。この findall を エラトステネスの篩 の中に持つエラトステネスの篩([],[]) :- !.エラトステネスの篩([M|R1],[M|R2]) :-        エラトステネスの篩(M,R1,L),        エラトステネスの篩(L,R2).エラトステネスの篩(M,R1,L) :-        findall(N,(                    member(N,R1),                    \+(0 is N mod M)),                L).が最も宣言的なエラトステネスの篩の定義かも知れない。エラトステネスの篩/2 の方は、findall で生成される新たなリストが第一引数に置き換えられて再び駆動される。このような新しい対象を生成しつつ、ダイナミックに繰り返すパターンは、再帰的な定義以外に方法がない。実行例?- n以下の素数(32,L).L = [2,3,5,7,11,13,17,19,23,29,31]?- エラトステネスの篩([2,3,4,5,6,7,8,9,10,11,12,13,14],L).L = [2,3,5,7,11,13]?-