read  `HIT2.txt`: 

K:=2:
L:=200:
init:=10^10:

M:=100:

print(`You start at`, init, `and you are willing to toss a coin up to `, L, `times `):
print(`If the coin lands on Heads you add 1 to the running su, if it lands in Tails you add 2`):
print(`You quit as soon as you hit a prime`):
print(`We will explore this for different loaded coins`):

for i from 1 to M-1 do
print(``):
print(`----------------------------------------------------`):
p:=i/M:
lu:=BiStatLo(i/M*x+(1-i/M)*x^2,x,L,init,isprime,K):

print(`if the prob.  of getting a Heads is`, i/M, `then `):
print(``):
print(`The prob. of finishing is`, lu[1]):

print(``):
print(`The (conditoned) expected duration is`, lu[2][1]):
print(``):
print(`The (conditoned) standard-deviation of duration is`, lu[2][2]):


print(``):
print(`The (conditoned) expected distance traveled is`, lu[3][1]):
print(``):
print(`The (conditoned) standard-deviation of duration is`, lu[3][2]):
print(``):
print(`The (conditioned) correlation between them is`, lu[4]):

od:

print(``):
print(`----------------------------------`):
print(``):
print(`This took `, time(), `seconds. `):
print(``):
quit: