Strahler

γ-Strahler

G-M-Zählrohr

zum Zählgerät

Anzahl der Bleiplatten

Schichtdicke einer Platte in cm

Zähltakt

Abschirmung von γ-Strahlung

Steuerelemente

Animation starten

ΔAkt = 126 (slider from 0 to 200, step 1)
t = 1 (slider from 0 to 1, step 1)
R_0: Random[10 + t, 20 + t] / 10
j = true
d = 0.2 (slider from 0.1 to 1, step 0.1)
A = Intersect(yAxis, xAxis)
B = Point(xAxis)
b, c, d_{2}, e = Cylinder(A, B, 0.4)
N = 4 (slider from 0 to 5, step 1)
A2: 1
A3: 2
A4: 3
A5: 4
A6: 5
A1 = NaN
B2 = If(N > A2 - 1, (((1.5 * d) * A2), 2, 2))
C2 = If(N > A2 - 1, (((1.5 * d) * A2), 2, -2))
D2 = If(N > A2 - 1, (((1.5 * d) * A2), -2, 2))
E2 = If(N > A2 - 1, (((1.5 * d) * A2), -2, -2))
B3 = If(N > A3 - 1, (((1.5 * d) * A3), 2, 2))
C3 = If(N > A3 - 1, (((1.5 * d) * A3), 2, -2))
D3 = If(N > A3 - 1, (((1.5 * d) * A3), -2, 2))
E3 = If(N > A3 - 1, (((1.5 * d) * A3), -2, -2))
B4 = If(N > A4 - 1, (((1.5 * d) * A4), 2, 2))
C4 = If(N > A4 - 1, (((1.5 * d) * A4), 2, -2))
D4 = If(N > A4 - 1, (((1.5 * d) * A4), -2, 2))
E4 = If(N > A4 - 1, (((1.5 * d) * A4), -2, -2))
B5 = If(N > A5 - 1, (((1.5 * d) * A5), 2, 2))
C5 = If(N > A5 - 1, (((1.5 * d) * A5), 2, -2))
D5 = If(N > A5 - 1, (((1.5 * d) * A5), -2, 2))
E5 = If(N > A5 - 1, (((1.5 * d) * A5), -2, -2))
B6 = If(N > A6 - 1, (((1.5 * d) * A6), 2, 2))
C6 = If(N > A6 - 1, (((1.5 * d) * A6), 2, -2))
D6 = If(N > A6 - 1, (((1.5 * d) * A6), -2, 2))
E6 = If(N > A6 - 1, (((1.5 * d) * A6), -2, -2))
F2, G2, H2, I2, J2 = Polygon(B2, C2, E2, D2)
F3, G3, H3, I3, J3 = Polygon(B3, C3, E3, D3)
F4, G4, H4, I4, J4 = Polygon(B4, C4, E4, D4)
F5, G5, H5, I5, J5 = Polygon(B5, C5, E5, D5)
F6, G6, H6, I6, J6 = Polygon(B6, C6, E6, D6)
K2, L2, M2, N2, O2, P2, Q2, R2, S2, T2, U2, V2, W2, X2, Y2, Z2, AA2, AB2 = Prism(F2, d)
K3, L3, M3, N3, O3, P3, Q3, R3, S3, T3, U3, V3, W3, X3, Y3, Z3, AA3, AB3 = Prism(F3, d)
K4, L4, M4, N4, O4, P4, Q4, R4, S4, T4, U4, V4, W4, X4, Y4, Z4, AA4, AB4 = Prism(F4, d)
K5, L5, M5, N5, O5, P5, Q5, R5, S5, T5, U5, V5, W5, X5, Y5, Z5, AA5, AB5 = Prism(F5, d)
K6, L6, M6, N6, O6, P6, Q6, R6, S6, T6, U6, V6, W6, X6, Y6, Z6, AA6, AB6 = Prism(F6, d)
C: (8, 0, 0)
D: (11, 0, 0)
f, g, h, i = Cylinder(C, D, 0.8)
E: (14, 0, 0)
u = Vector(D, E)
k = 0.916 (slider from 0 to 2, step 0.001)
R_S = If(j ≟ true, Random[1000 - ΔAkt / 2 + t, 1000 + ΔAkt / 2 + t], 0)
R_d: round((R_S * ℯ^((((-k) * N) * d))) + R_0, 1)
Text3: "Zählrate: " + R_d + " s⁻¹"
a = false
Aktivität = 1000 (slider from -5 to 2000)