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