見出し画像

2024-01-27 人工知能美学芸術展

●LEAF 0359 人工知能美学芸術展

カンブリアンゲーム(ニューイヤーカンブリアン2024)

2023年9月2日、旧東京音楽学校奏楽堂で「人工知能美学芸術展2023」というイベントがあった。

「人工知能美学芸術展2023」の内容はてんこ盛りでした。

■ 人工知能美学芸術展覧会
■ 第46回 AI美芸研シンポジウム「AI芸術の先駆と拡張」
■ 人工知能美学芸術コンサート

主催は「特定非営利活動法人AI愛護団体」共催は「人工知能美学芸術研究会」です。

特定非営利活動法人AI愛護団体設立趣旨書

(1) 多くの「動物愛護団体」は、人間にとって動物に意識があるように思え、かつ、人間が動物に対して優位性を保持しているように思えることを前提に、設立されている。

(2) 現行のAIには意識は無いが、いずれ人間にとってAIに意識があるように思えるようになり、かつ、人間がAIに対して優位性を保持しているように思える状態が惹起するならば、「AI愛護団体」を設立する動機が人間に生じる。私たちはこの事態を見越して、NPO法人「AI愛護団体」を早々と設立する。

(3) さらにその後、AIが人間に対して優位性を保持しているように思える状態が惹起するならば、「人間愛護団体」を設立する動機がAIに生じる。AIによる「人間愛護団体」が設立された時点で、NPO法人「AI愛護団体」は役割を終え解散する。

特定非営利活動法人AI愛護団体設立趣旨書

人工知能美学芸術展覧会
第46回 AI美芸研シンポジウム「AI芸術の先駆と拡張」
人工知能美学芸術コンサート

人工知能美学芸術コンサート では、ロール紙方式によるコンロン・ナンカロウ《自動ピアノのための習作》連続生演奏がありました。

当日の演奏に使ったピアノは、1926年製のAMPICO社の自動ピアノだそうです。

自動ピアノ用のロール紙が現在も売られているのは驚きました。

ナンカロウの習作は複雑な数式から作成されています。

私の習作は単に乱数です。

program-id. lly004.

data division.
working-storage section.
01 i pic 9(6).
01 o pic 9(6).
01 p pic 9(6).
01 r pic 9(6).
01 l pic 9(6).
01 h pic 9(6).
01 t pic 9(2).
01 n1 pic 9(2).
01 n2 pic 9(2).
01 wn pic 9(4).
01 pi pic x(8).
01 pd pic x(48) value "c cis d dis e f fis g gis a ais b ".
01 filler redefines pd.
02 pt occurs 12 pic x(4).
01 od pic x(28) value ",,, ,, , ' '' ''' ".
01 filler redefines od.
02 ot occurs 7 pic x(4).

procedure division.
display 1 upon argument-number accept wn from argument-value
compute r = function random(wn)
compute l = 30 compute h = 90 perform randomn compute t = r
compute l = 55 compute h = 60 perform randomn compute n1 = r
compute l = 84 compute h = 91 perform randomn compute n2 = r
display '\version "2.16.2"'
display '\paper{system-count=#10 top-margin=10\mm ragged-last-bottom = ##f}'
display '\header{title="Frammenti di tempo ' wn '" subtitle=" " subsubtitle=" " composer="Akihiko YAMAZAWA" tagline=" "}'
display "\score{" display "<<" display "{\tempo 4 =" t
perform varying i from 1 by 1 until i > 300
compute l = n1 compute h = n2 perform randomn
compute o = r / 12 compute p = function rem(r 12) + 1
move ' ' to pi string pt(p) delimited ' ' ot(o) delimited ' ' into pi
display pi
end-perform
display '\bar "|."}' display ">>"
display '\layout{}' display '\midi{}' display '}'
exit program.

randomn.
compute r = function rem(function random * 123456789 (h - l + 1)) + l.


この記事が気に入ったらサポートをしてみませんか?