レポートが終わらなくて先生に急かされてるのに今日から4連勤だ(>_隣で3準位系のエネルギーと比熱を求める問題を考えている人が居たんで、これを解くMathematicaファイルを作ってしまった。それがとても上手く行って、N準位系の場合に一般化できたんで、1000…