結果 Oh! Life

懲りずに書いてみたりする結果オーライな日記



200912月26

紫外線LED:Kミドリイシの防御反応

この記事を含むタグの全記事リスト: LED水槽記録 紫外線LED

「ケントパパミドリイシ」は長いので、Kミドリイシとする(笑)

まず、ここ3日間でのKミドリイシの損傷部の修復具合から。

3日間で修復された損傷部

KミドリイシD.の損傷部は、ほぼ修復率100%と言える。思ったより早い早い♪

で、調子こいて早速LEDランプを少し下げてみたら。。。

防御反応と思われる刺糸

まだイヤだそうです(苦笑)

ミドリイシの防御反応:刺糸
てきめんに光強度がフローすればポリプの萎縮が見られるが、刺糸を出す程度ならまだ応戦できるほどの余裕があると見える(笑)。とは言え無理はさせたくないので、照明は元の高さに戻した(汗)
で、刺糸が落ち着くのにどれくらいの時間を要するのか観察してたら、5時間程度を要した。それでも若干引っ込みの悪い刺糸もあったけど。
やはり光をいじるのは全快してからの方が良さそうですね。

もうひとつの防御反応:共肉表皮の萎縮

防御反応と思われる共肉表皮のしわ

これは厳密に見ると萎縮なのか膨張なのか判断が微妙だが、いずれにしても表皮形状に極端な凹凸(ふやけたような皺)が見られる。この現象は、修復された損傷部だけではなく、元々の健常部にも見られる。
これが何を意味するのか、何が原因なのか推測すると、やはり光の照射面に顕著に見られるので、光に対する反応には間違い無さそうだ。ま、現時点では単に光が強いだけではなく、輸送ストレスによる光耐性の低下(共肉組織・渇虫藻の機能低下)とも関連して、より顕著に反応していると言えそうだ。

うーん。。。早くガンガン照らしたい。
放っておくと、すぐ茶色くなりそうで(汗)

ところで、だにミドリイシ(以降、Dミドリイシ)のC.は、LeDio7 UVの直下のやや後ろに移動させた。特に拒否反応も無いので、様子を見ながら更に光量をアップしていこう。
また、UV3Wを当てている方のDミドリイシA.が、日に日に赤くなってきた♪
詳細は次号を待て(笑)

このエントリーをはてなブックマークに追加

こちらのエントリーもどうぞ♪


200912月26

Xmasプレゼント当選発表♪

この記事を含むタグの全記事リスト: LED 応援市場

Xmas volxjapan

ボルクスジャパン提供クリスマスプレゼントへのたくさんのお申し込みありがとうございました。
応募は25日いっぱいで締め切りとさせていただきました。

さあ、幸運の女神に祝福された当選者の方々を発表いたします♪

ボルクスジャパン・クリスマスプレゼント2009 当選者

  1. A. LeDio15 DeepBlue 1名様
    saepapaさん (兵庫県)
  2. B. LeDio3 UV 3名様
    takeyanさん (京都府)
    こ~じさん (静岡県)
    mamasasaさん (大阪府)
    * 暗く見えても強力な紫外線を発してますので絶対に直視しないこと!
  3. C. LeDio3 RoyalBlue 4名様
    ショパンさん (広島県)
    ひなどりさん (兵庫県)
    Junyakunさん (神奈川県)
    コエダナガレさん (大阪府)
  4. D. LeDio3 DeepRed 2名様
    へっぽこオヤジさん (北海道)
    兼業さん (兵庫県)

ボルクスへは既に当選者リストをお知らせしました。
さあ、見事当選された方は、そわそわしながらお待ちください♪
一方、今回惜しくも外れた方、ホントに残念でした。いつかきっと良い事あるさ(汗)

ちなみに抽選は以下の方法で厳選に行いましたのでご了承ください。

Xmasプレゼント当選結果

なんのこっちゃ(汗)

これは何かと言いますと、Perlで書いた即席抽選プログラムによる結果画面です。
仕組みは、各商品の応募数を上限とした乱数を発生させて、最初に10回出現した応募番号の人が当選!と言うアルゴリズムです。これを本日AM8:00ジャストに実行しました。
ちなみに応募番号は、商品別に届いた応募着信順をそのまま応募番号としました。

以下、念のためソースです。

#!/usr/bin/perl

my $rep = 10;
my @max = (21,11,9,5);
my @num = (1,3,4,2);
my $html;

srand;
for my $i (0..$#max) {
  my($list,%user);
  my $str = chr(65 + $i);
  $html .= "<h3>$str ($max[$i])</h3>n";
  foreach (1..$num[$i]) {
    my(%rnd,$rnd,$line);
    while ($rnd{$rnd} < $rep) {
      $rnd = int(rand($max[$i])) + 1;
      next if ($user{"$str$rnd"});
      $rnd{$rnd}++;
      $line .= "$rnd, ";
    }
    $user{"$str$rnd"}++;
    $line =~ s/(^| )($rnd),/$1<strong>$2</strong>,/g;
    $list .= "<p>$line</p>n";
  }
  $html .= "$list<hr />n";
}

print "Content-type: text/htmlnn$html";
exit;

ま、何の役にも立ちませんがね(笑)

このエントリーをはてなブックマークに追加

こちらのエントリーもどうぞ♪




コンテンツ

スペクトラ LEDスペクトラ解説