blog.monophile.net

コンピュータのこととかのメモ。

Takaaki Yamamoto

東京工業大学において計算機科学と応用数学を学び、 情報科学芸術大学院大学[IAMAS]においてメディア表現を専攻し修了。 2015年にコンビネータ論理を基に計算完備な計算手法 "論理珠算"を開発し、 それを含む体系である"算道"を構成した。 その成果により、 第19回 文化庁メディア芸術祭 アート部門 新人賞 (文部科学大臣賞) を2016年に受賞。 現在はdigitiminimi inc.において、インフラエンジニアとして生計をたててている。

work

各種システム構築と管理を承ります。使用できるのは↓。

Configuration Management Ansible, Terraform, cloud-init
Cloud Platform AWS, Azure, GCP, Openstack
Openstack Keystone, Glance, Cinder(Ceph), Neutron(VLAN), Nova(QEMU), Horizon
Virtualization QEMU+KVM, LXD/LXC, Docker
OS Ubuntu, Debian GNU/Linux, CentOS, ...
Storage Ceph, GlusterFS, ZFS, btrfs, ...
Networks Tunnel(IPSec, L2TP, VXLAN, GRE), WirelessAP, ...
DB MySQL, MariaDB(Galera Cluster), MongoDB
Mail postfix, dovecot
WebApps WordPress, GitLab, MatterMost, Redmine, RainLoop, ...
Monitoring Nagios, Munin
Misc certbot, dnsmasq, ...

study

習得中の技術は↓。

Orchestration Kubernetes
Openstack swift, manila, trove
OS CoreOS(Container Linux), Vyatta(VyOS), ...
Networks IPv6, BGP(quagga, calico), flannel, fan, ...
DB/KVS Redis, etcd
Monitoring Prometheus, Zabbix
DNS CoreDNS, PowerDNS
Misc MAAS

posts

SuperColliderでリスト内包表記

いきさつ

個人的にリスト内包表記が大好きです。 なんと言っても、ワンライナーでの情報量の多さと見やすさですかね。 SuperColliderでも表記できるようなので、やってみました。 どうやらSuperColliderの場合はジェネレータからリストを作るような構造になっているみたいです。

ジェネレータ

2乗が50を超えない偶数を列挙してみます。

(
  z = {: x, x <- (1..), :while x**2 < 500, x.even, ::x.postln };
  z.next;
  z.next;
  z.next;
  z.next;
)

上記のコードを実行すると以下のように出力されると思います。

2
4
6
nil

{: ... } の部分がジェネレータ(実際のクラスはRoutine)を表しています。 :whileと::<副作用的な式>はオプションで使用することができます。

リスト

上記のリスト版です。

(
  z = all {: x, x <- (1..), :while x**2 < 500, x.even, ::x.postln };
  z.postln;
)

上記のコードを実行すると以下のように出力されると思います。

[2, 4, 6]

ジェネレータの前にallという文字列を置くことによってジェネレータから生成される数列をまとめてくれるのですね。

reference