デンマーク

地図
https://www.google.com/maps/place/%E3%83%87%E3%83%B3%E3%83%9E%E3%83%BC%E3%82%AF/@56.1488816,7.0586993,6z/data=!3m1!4b1!4m5!3m4!1s0x464b27b6ee945ffb:0x528743d0c3e092cd!8m2!3d56.26392!4d9.501785


貝塚の研究は19世紀後半にデンマークで始められた
wikipedia:貝塚

貝塚の研究は19世紀後半にデンマークで始められた[9]。ヨーロッパ先史考古学の指導的位置にあったデンマーク人考古学者でデンマーク国立博物館館長のイェンス・ヤコブ・アスムッセン・ウォルソー(英語版)は、同じデンマーク人の動物学者ヤペトゥス・ステーンストロップ(Johannes Japetus Smith Steenstrup)および...


デンマーク語って難しい?
https://tokuhain.arukikata.co.jp/copenhagen/2009/11/post_17.html


ビャーネ・ストロヴストルップ(Bjarne Stroustrup)
wikipedia:ビャーネ・ストロヴストルップ


せんせいが “びゃーね・すぽっすぽっ” と呼ばれる理由
https://hej.hatenablog.com/entry/2012/03/05/025910

mod_auth_mellon

mod_auth_mellon を使ってみた
https://qiita.com/aimoto/items/89ba104db85a2b89fa67

mod_auth_mellon は 認証連携プロトコルSAML をしゃべってくれるApacheのモジュールです。


mod_auth_mellon User Guide
https://jdennis.fedorapeople.org/doc/mellon-user-guide/mellon_user_guide.html


mod_auth_mellon
https://github.com/latchset/mod_auth_mellon

タイムラインを作るぞ

更級日記方丈記を読んで、タイムライン(年表?)を作ってみたくなった。

イベント(人も出来事もイベントとして扱う)のリストを作る

$ more events 
紫式部,973?,1014?
菅原孝標女,1008,1059
平清盛,1118,1181
源頼朝,1147,1199
鴨長明,1155?,1216
藤原定家,1162,1241
明月記,1180,1235
養和の飢饉,1181,1181
吉田兼好,1283,1350

紫式部
https://kotobank.jp/word/%E7%B4%AB%E5%BC%8F%E9%83%A8-140850

ブリタニカ国際大百科事典 小項目事典「紫式部」の解説
紫式部
むらさきしきぶ
[生]天延1(973)頃
[没]長和3(1014)頃

菅原孝標女
https://ja.wikipedia.org/wiki/%E8%8F%85%E5%8E%9F%E5%AD%9D%E6%A8%99%E5%A5%B3

菅原孝標女(すがわら の たかすえ の むすめ、寛弘5年(1008年) - 康平2年(1059年)以降?)は、平安時代の貴族の女性。本名は伝わっていない。
10歳頃から50歳頃までの人生を回想した『更級日記』の作者。

更級日記
https://ja.wikipedia.org/wiki/%E6%9B%B4%E7%B4%9A%E6%97%A5%E8%A8%98

東山御文庫に伝えられてきた 藤原定家による写本、通称「御物本」が現存する。

藤原定家の書写、80丁
https://ja.wikipedia.org/wiki/%E6%9B%B4%E7%B4%9A%E6%97%A5%E8%A8%98#/media/%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB:Teika-sarashina-nikki-calligraphy.png

タイムラインを描くプログラムを作る

(my_timeline.pl)

#!/usr/bin/env perl

$min = undef;
$max = undef;

$i = 0;
while(<>){

  chomp();
  ($name,$start,$end) = split(/,/);

  $event[$i][0] = $name;
  if( $start =~ /(\d+)(\?*)/ ){
    $start = $1;
    $event[$i][1] = $1;
    $event[$i][3] = $2;
  }
  if( $end =~ /(\d+)(\?*)/ ){
    $end = $1;
    $event[$i][2] = $1;
    $event[$i][4] = $2;
  }

  if( $min eq undef || $start < $min ){ $min = $start; }
  if( $max eq undef || $max < $end ){ $max = $end; }

  $i++;

}
$n = $i;

print "min:$min\n";
print "max:$max\n";
$min_dig = int(log($min)/log(10));
$max_dig = int(log($max)/log(10));
$min = int( $min / 100 ) * 100;
$max = int( $max / 100 + 1 ) * 100;
print "range:$min-$max\n";

$split = 5;
#$inc = ( $max - $min ) / $split;

#年を描く
for($i=$min;$i<$max;$i+=$split){
  if( $i % 50 == 0 ){
    print $i;
    $len = length($i) - 1;
  }elsif( $len > 0 ){
    $len--;
  }else{
    print " ";
  }
}
print "\n";

for($i=$min;$i<$max;$i+=$split){
  if( $i % 50 == 0 ){
    print "+";
  }else{
    print "-";
  }
}
print "\n";

#個々のイベントを描く
for($i=0;$i<$n;$i++){
  for($j=$min; $j<$max; $j += $split){
    if( $j <= $event[$i][1] && $event[$i][1] < $j + $split ){
      if( $event[$i][3] ){
        print "?";
      }else{
        print "I";
      }
    }elsif( $j <= $event[$i][2] && $event[$i][2] < $j + $split ){
      if( $event[$i][4] ){
        print "?";
      }else{
        print "I";
      }
    }elsif( $event[$i][1] < $j && $j + $split <= $event[$i][2] ){
      print "-";
    }else{
      print " ";
    }
  }
  print "$event[$i][0],$event[$i][1]$event[$i][3],$event[$i][2]$event[$i][4]\n";
}

実行してみる

$ ./my_timeline.pl events 
min:973
max:1350
range:900-1400
900       950       1000      1050      1100      1150      1200      1250      1300      1350      
+---------+---------+---------+---------+---------+---------+---------+---------+---------+---------
              ?-------?                                                                             紫式部,973?,1014?
                     I---------I                                                                    菅原孝標女,1008,1059
                                           I------------I                                           平清盛,1118,1181
                                                 I---------I                                        源頼朝,1147,1199
                                                   ?-----------I                                    鴨長明,1155?,1216
                                                    I---------------I                               藤原定家,1162,1241
                                                        I----------I                                明月記,1180,1235
                                                        I                                           養和の飢饉,1181,1181
                                                                            I-------------I         吉田兼好,1283,1350


菅原孝標女が幼少の頃、まだ紫式部は生きていた?
菅原孝標女が亡くなってから、藤原定家が生まれるまで100年以上の開きがある。
養和の飢饉が藤原定家鴨長明に与えたインパクトは大きいのか?

Prima O Poi  ジョバンニ・ミラバッシ・トリオ

トラック タイトル 作曲者
1 Ero io (feat. Flavio Boltro, Louis Moutin & Gildas Bocle) ジョバンニ・ミラバッシ
2 Il bandolero stanco (feat. Flavio Boltro, Louis Moutin & Gildas Bocle) ジョバンニ・ミラバッシ
3 Barcarole ジョバンニ・ミラバッシ
4 Gettin' In (feat. Flavio Boltro, Louis Moutin & Gildas Bocle) ジョバンニ・ミラバッシ
5 Howl's Moving Castle (feat. Flavio Boltro, Louis Moutin & Gildas Bocle) Joe Hisaishi
6 Symphomaniax ジョバンニ・ミラバッシ
7 Minor Voyage (feat. Flavio Boltro, Louis Moutin & Gildas Bocle) ジョバンニ・ミラバッシ
8 Tôt ou tard (feat. Flavio Boltro, Louis Moutin & Gildas Bocle) ジョバンニ・ミラバッシ
9 L'ingenere (feat. Flavio Boltro, Louis Moutin & Gildas Bocle) ジョバンニ・ミラバッシ
10 Llöro (feat. Flavio Boltro, Louis Moutin & Gildas Bocle) Egberto Gismonti