Science > Physics > Dissidence 101- AND the NIST Neutron Error and Copanhagen
| Topic: |
Science > Physics |
| User: |
"Douglas Eagleson" |
| Date: |
16 Apr 2007 06:05:09 PM |
| Object: |
Dissidence 101- AND the NIST Neutron Error and Copanhagen |
REM ATOMIC REACTION
REM A Program as the applied binding energy.
N = 238
d = 1
BINDING = 3
MASS = 1
E = 1.0005
NUKENUM = 238
TOTAL = 0
LASTBINDE = 1.0002
BINDING = MASS / N - E
REM For a given mass compute the last nucleon energy.
REM SO solve the binding function!
REM MASS = (TOTAL BINDING - NUCLEON BINDING)NUCLEON MASS?????
REM MASS = MASS LASt NEuclon+ ........????
REM IS playing with the variable set difficult?
REM HERE is a program
REM USE ALL AMU UNITS
FOR I = 1 TO NUKENUM
LET BINDINGE = I * LASTBINDE
LET TOTAL = TOTAL + BINDINGE
NEXT I
PRINT "LOUSEY="; TOTAL
REM I have written a program to totalize error in binding. And if the
REM reader is a real physicist, they would complain of the degree of
REM error.
REM A series now exemplifies the total.
REM HOW many amu/neutron detected??????
REM Each neutron emitted causes a neutron amu.
REM SO all energy as amu may be dose units!
REM I realize the program is confusing, but nuclear binding energy
REM ALLOWS ALL neutron doses to be in special units!
REM I HOPE the parody is obvious. NIST Neutrons are in error by the
REM amu basic special series. So this Program preceeds the
REM detonator program. If you do not believe this, then the bombs
coming
REM will surprise you.
REM********************************************************************
REM A Trigger for safe nuclear Detonations
REM A Safety is designed to allow a completed control system.
REM A well considered design.
REM A non- trick safety switch allows programs to run while
REM transporting the device. A safe switch input allows the false
usage.
REM "SAFE" is a computer read switch!
REM Turning on the computer with the switch NOT safe, runs the
detonation
REM sequence.
DIM TIME0, TIME1
1 DDAYS = 0
3 SAFETY1 = 0
4 INPUT safe
5 IF (safe = 1) THEN GOTO 10000
6 IF (DDAYS > 0) THEN GOTO 5000
10 CLS
REM learn the safety logical sequenceing!
REM a first reading,as input is a kind of safety.
REM Add a keypad lock out as the main while loop is entered!
REM
REM
PRINT "NUclear Detonation Timer"
PRINT "Version 2.44"
111 d$ = DATE$
113 t$ = TIME$
PRINT "Date:"; d$
PRINT "Time:"; t$
145 TIME0 = (((VAL(t$) / 24)) + VAL(MID$(t$, 4)) / 1440)
REM
147 TIME1 = 1
149 PRINT "*************ENTER TIME************"
1500 PRINT "Enter delays days:"
1505 INPUT DVAL
REM
REM
1700 CLS
1702 PRINT "Detonation Time="; TIME0 + 24
1706 a$ = LEFT$(d$, 5)
1711 a$ = RIGHT$(a$, 2)
1714 a$ = STR$(VAL(a$) + 2)
1715 f$ = LEFT$(d$, 3) + a$ + RIGHT$(d$, 5)
1717 PRINT "Detonation Date:"; f$
REM a style of user requires a false timer, so th eonly time allowed
REM displayed is a false display.
REM
REM
REM
1904 IF DVAL >= 1 THEN DVAL = .001
1905 IF DVAL + TIME0 > 1 THEN
1907 DVAL = (DVAL + TIME0) - 1
1908 TIME0 = TIME0 - 1
1909 END IF
1910 IF DVAL + TIME0 <= 1 THEN
1911 DVAL = DVAL + TIME0
1912 TIME0 = 0
1913 END IF
REM
REM You get a thousandth of a day to run.
REM A fraction of a day denotes the delay time.
REM
2000 DO WHILE t$ > ""
REM
2001 DDAYS = 1
REM A sequencer, as the safety and detonation was designed
carefully.
REM Do not ever use a different system.
2123 t$ = TIME$
2234 TIME1 = (((VAL(t$) / 24)) + VAL(MID$(t$, 4)) / 1440)
3090 IF (TIME1 + TIME0 > DVAL) THEN GOTO 6
REM
3094 PRINT "INPUT SAFETY1"
3095 INPUT SAFETY1
3096 IF (SAFETY1 = 1) THEN GOTO 6
REM
4000 LOOP
REM
4001 GOTO 5000
REM IF you want to play with sneaky safeties place a
REM "IF<condition good>...GOTO 10000" switch READ here.
REM And always let the timer time out to make it safe!
REM
5000 PRINT "Place detonation output switch action here.!"
5001 PRINT "TIME="; TIME$
5101 GOTO 20000
10000 PRINT "Why did you power up the device?"
12000 PRINT "Place auto safe shutdown here."
20000 END
.
|
|
|
Related Articles |
|
|
