N88-BASICで年代測定(isotope)
2024/6/3(月) N88-BASICで年代測定 ■ 式 T:半減期 P:放射性同位体の減少率(全体を1とした時の割合) n:半減期の回数 t:経過時間 P = (1/2) n = 2 -n より -n = log 2 Pなので n = -log 2 P また t = T・n = -Tlog 2 P ■ 例 1 4 Cの半減期(T = 5730年) 1 4 Cの存在比が天然存在比の1/8 (P = 1/8) とすると 5730年毎に半分(×1/2)になるので |→5730年→|→5730年→|→5730年→| ×1 ×1/2 ×1/4 ×1/8 5730年×3 = 17190年経っていた n = -log 2 P = -log 2 (1/8) = -(-3) = 3 [つまり P = (1/2) n = (1/2) 3 = 1/8] t = T・n = 5730年×3 = 17190年 VL,NL,XL-BASICと d lg~.zip ( iso 001.bas)は 以下のリンクからダウンロードできます https://ulprojectmail.blogspot.com Readme.txtを読んで遊んで下さい