ときどきの雑記帖 RE* (新南口)

極論対極論

ノイエ銀英伝

ふと、今の(そして将来の)「えーあい技術」なら ケンプからの通信に対する返事をでっちあげられそうな (そもそも戦闘も「えーあい」任せに(ry)。

とは言えその手の技術は失われたか封印されたかしたんだっけか 銀英伝世界では。

ブラタモリ

ちょっと先だけどメモ

グラハム・ハンコック

なんか久しぶりに名前を見かけて

世界を震撼させた『神々の指紋』の著者が解明に挑む「真の人類史」とは!?　教科書で習った歴史を完全にひっくり返す１冊　『人類前史』グラハム・ハンコック｜ブックレビュー｜COLORFUL

まだ新作書いてたのかと思ったのだけど

話題の名著、待望の文庫化。

今回は少し前に出たものの文庫化なのね。 だとしてもまだ書いていたことにびっくり(本日一回目)

「神々の指紋」は当時(いつ?)結構面白く読んだのだけど とある部分の論理展開に「あきれ果て」て止めたんだよね。

さらに読んでいたらその辺も「手当て」されていたのかもしれないけど、 当然(?)、その後の本もスルーした

北条氏、栄華の果て

行けるかどうかわからないけど

企画展｢北条氏、栄華の果て｣ 歴史文化交流館　21日から | 鎌倉 | タウンニュース

ていこくのぎゃくしゅう

The empire of C++ strikes back with Safe C++ proposal • The Register

Redefine Spreadsheets

Excel’s New Python Integration May Redefine Spreadsheets

プログラミング言語とスプレッドシート(的なもの)との組み合わせは たまに考えたりすることがあるのだけど、 さて。

CVar

Cなんとかでいろいろな型変換の関数があるのは知っていたけど variant型に変換するのもあったのか

ExcelVBA CVar関数 引数をVariantに変換します

Excelの謎挙動

Excelでは書式をごにょごにょすると、 24時間を超える時間を表記できる

名前 1月 2月 3月 4月
足利茶々丸 60:00 20:00 23:59 350:00
太田資長 40:00 70:00 24:00 270:00
伊勢盛時 80:00 50:00 39:00 400:00

こんな感じ。

実は内部的にはあくまで日時データ(年月日+時刻)であって、 時間間隔(duration)ではなかったりするのだけどそれはさておき。 こういったデータを↓のようなSQLを使って転記すると

やっつけプログラム 
Option Explicit

Sub execQuery(ws As Worksheet)
    Dim filename, sql As String
    filename = ThisWorkbook.FullName

    Dim conn As ADODB.Connection
    Set conn = New ADODB.Connection
    conn.Provider = "MSDASQL"
    conn.ConnectionString = "Driver={Microsoft Excel Driver (*.xls, *.xlsx, *.xlsm, *.xlsb)};" _
                          & "DBQ=" & filename & "; ReadOnly=True;"
    conn.Open
    sql = "SELECT * FROM [Sheet1$]"
    Dim rs As ADODB.Recordset
    Set rs = New ADODB.Recordset

    rs.Open sql, conn, adOpenStatic

    Dim currentRow As Long
    currentRow = 1
    Do Until rs.EOF
        ws.Cells(currentRow, 1).Value = rs![名前]
        ws.Cells(currentRow, 2).Value = rs![1月]
        ws.Cells(currentRow, 3).Value = rs![2月]
        ws.Cells(currentRow, 4).Value = rs![3月]
        ws.Cells(currentRow, 5).Value = rs![4月]
        rs.MoveNext
        currentRow = currentRow + 1
    Loop
    rs.Close
    conn.Close
    Set rs = Nothing
    Set conn = Nothing
End Sub

Sub main()
    Dim ws1 As Worksheet
    Set ws1 = ThisWorkbook.Worksheets(1)
    ws1.Select
    ws1.Range("A1").CurrentRegion.NumberFormatLocal = "[h]:mm"
    execQuery ThisWorkbook.Worksheets("Sheet2")

    ws1.Select
    'ws1.Range("A1").CurrentRegion.NumberFormatLocal = "G/標準"
    ws1.Range("A1").CurrentRegion.NumberFormatLocal = "General"
    Dim ws3 As Worksheet
    Set ws3 = ThisWorkbook.Worksheets(3)
    execQuery ws3
    ws3.Range("A1").CurrentRegion.NumberFormatLocal = "[h]:mm"

    ws1.Select
    ws1.Range("A1").CurrentRegion.NumberFormatLocal = "[h]:mm"
End Sub

書式が24時間以上表記できるものそのままの場合、 24時間を超えているデータが+24時間(というか1日)されてしまう。 書式をたとえば標準に変えて転記した場合にはこの増加現象は起きない。

こんなの踏む人が他にいるとはあまり思えないけど とりあえず書き残しておく。

新山さん

新山祐介 (Yusuke Shinyama): “ソフトウェア開発者に必要な10の習慣: - commitは可…” - Mastodon 🐘

ソフトウェア開発者に必要な10の習慣:

  • commitは可能な限り小さく
  • 継続的リファクタリング
  • どんなコードも負債だ
  • APIを設計するならテストから書くべし
  • コピー・ペーストは1回までならOK
  • 設計も古くなると心得よ
  • テストしやすいのがいい設計だ etc.

とあるのだけど、「どんなコードも負債だ」はどこにあるんだろう?

Good software development habits | Zarar’s blog

(技術的)負債は

  1. Technical debt can be classified into three main types:

だけど、

  1. All code is a liability. Undeployed code is the grim reaper of liabilities.

「どんなコードも××だ」はこっちだよねえ

新刊近刊

Rust

けっこういいペースでRust本が出版されている印象があるんだけど 「ビッグウェーブ」来てる?

プログラムを読む技術

書くスキルも設計スキルも飛躍的に上がる！ プログラムを読む技術 岩松 洋 [その他] - 新刊.net

タイトルでメモ。

lisp本

つらつらと考えてみたんだけど、例のLisp本 800ページというのは A4換算だったとして どのくらいの値段になるのか 判型や厚さで近いものをいくつか調べてみると

世界標準MIT教科書 アルゴリズムイントロダクション第4版総合版

単行本: 1182ページ

これがほぼ２まんえん。

セジウィック:アルゴリズムC 第1~4部 ―基礎・データ構造・整列・探索― | ロバート セジウィック

出版社: 近代科学社 (2018/3/1) 単行本: 656ページ

￥9,900 税込

セジウィック:アルゴリズムC 第5部-グラフアルゴリズム- | R.セジウィック

出版社: 近代科学社 (2021/11/24) 単行本: 400ページ

￥7,150 税込

世界標準MIT教科書　Python言語によるプログラミングイントロダクション 第3版 | John V. Guttag

出版社: 近代科学社 (2023/1/31) 単行本（ソフトカバー）: 504ページ ￥6,050

世界標準MIT教科書 ストラング:教養の線形代数 | Gilbert Strang, 松崎 公紀, 平鍋 健児

  • 世界標準MIT教科書 ストラング 微分方程式と線形代数 ￥9,702
  • 世界標準MIT教科書 ストラング:線形代数とデータサイエンス ￥8,085
  • 世界標準MIT教科書 ストラング:計算理工学 ￥9,702
  • 世界標準MIT教科書 ストラング:線形代数イントロダクション ￥8,624

ハードカバーかそうでないか、出版時期(なんのかんので本の値段も上昇傾向だし)もあるので あくまで(あまりあてにならない)推測だけど 結構な値段になりそうではある。 これに印刷部数を乗ずると…

エリート過剰生産が国家を滅ぼす

「数理モデルを用いて歴史にパターンを見出す」で あるものを連想したのだけど、 同じように思った(考えた)人は少なくなかったらしい(笑

awk

gawk

5.3.1がリリースされた

Gawk 5.3.1 released

This is a bug-fix release.

なので、大きな変更はなし(多分

bashism

gawkじゃないけど、GNU関連のコミットで見かけた 「bashism」という言い回しが印象に残ったので。

configure.ac: fix incorrect bashism m17n/m17n-lib.git - m17n-lib

The POSIX test command only accepts single-equals. The use of double equals is a bashism that is exactly equal to using single-equals, and must never be used. It provides no advantages in any scenario, and it messes with muscle memory when one has to write portable POSIX sh scripts.

もっとも以前にも見聞きしたことがあると思うんだけど。

regular expression compile failed

regular expression compile failed: awk error(134) #AWK - Qiita

これ、使っている処理系がわからんのだけど (エラーメッセージでググるとmawkっぽい?)

# awk:wc.awk (c) Dr. Kiyoshi Ogawa
# https://qiita.com/kaizen_nagoya/items/8837d94ae7b5ef05be86
{
gsub(/[`'&%$-.,:;!?^#*_~=/|@\\<>(){}0123456789\[\]"]/," ") 
for (i=1;i<=NF;i++) 
count[$i]++ 
} 
END {for (w in count) 
print w,count[w] | "sort -f" 
}

# awk -f wc.awk sprint.txt > sprint.wc
awk: wc.awk: line 4: regular expression compile failed (bad class -- [], [^] or [)
[`'&%$-.,:;!?^#*_~=
awk: 4: unexpected character '@'
awk: 4: unexpected character '\'
awk: wc.awk: line 4: runaway string constant ")  ...

ブラケットの中に生の/があるので、そこで正規表現リテラルが終わっているとみなされて エラーになったんじゃないですかね。 以前にも何度か書いたことだけど、正規表現の文字クラスを書くときブラケット中に /を置くにはそれをエスケープしなければならないawk処理系がある。

んでも

ひさびさに使ったらエラーがでた

以前は同じスクリプトが問題なく動いていた?

FORTRAN Compiler on IBM 704

Hugo メモ

メモ

go

どの程度グループに重なりがあるのかわからないけど、 Go(やPython)にきつくあたる人がそれなりに見受けられるのはなぜだろう (Rubyに対する「風当り」は以前よりは弱くなった感じがするけど 風向きがそっち向いたんですかね)?

PEP 308

激闘は憎しみ深く ≪ prev
next ≫ 地下室のメロディー