1152_Short_Form_Floating_Point_Output_Nov62 1152 Short Form Floating Point Output Nov62

1152_Short_Form_Floating_Point_Output_Nov62 1152_Short_Form_Floating_Point_Output_Nov62

User Manual: 1152_Short_Form_Floating_Point_Output_Nov62

Open the PDF directly: View PDF PDF.
Page Count: 4

PROGRAM.
TITLE:
RECOMP
II
USERS'
PROGRAM
NO.
1152
SHORT
FORM
FLOATING
POINT
OUTPUT
(Familiarly
known
as
Super
Floating
Point
Output) .
PROGRAM
CLASSIFICATION:
Subroutine
AUTHOR.
PURPOSE:
DATE.
Thomas
W.
Lawhorn
To
rapidly
print
out
a block
of
floating
point
data.
28
November
1962
Published
by
RECOMP
Users'
Librar,y
at
AUTONETICS
INDUSTRIAL
PRODUCTS
A
DIVISION
OF
NORTH
AMERICAN
AVIATION,
INC.
3400
East
70th
Street,
Long
Beach 5,
California
DISClAIMER
Afthovgh
1t'
Is
assumed
that
all
the precautions
have
beon
t,lcln
to
check
out
this
progrJm
thoroughly, no responsibility
I~
tlk.n
by
the
origin;')t~r
of
11i!j
progr.1n1
far
llny
orroncoul
ralulta, mJ5c'oncp
pt:ons,
or
mi
·re:Jro:::nt~tjor.s
1hflt
mJY
.~~~I)·'1j!r
In this progrDm.
Furth~
rrr.cr;!,
r,o
p~,p-,
"l'ib!::ly
III
!ill~t:'f1
"'1
AUf()i"lot;c:.
!ndu~tr!~,d
Pronu.:ts
br
th~
c('
..
rr,ct
r~or"clwtb,~I,t;
~:\f
this
program.
No
wammty,
('nprr';::. r:,r
imp/lQd,
la
~xf6m'ad
by
the
use
or application
of
the pro9ram.
- 1 -
PROGRAM
TITLE:
SHORT
FURM
FLOATING
POINT
OUTPUT
PURPOSE
To
rapidly
print
out
a
block
of
floating
point
data.
DESCRIPTION
This
subroutine
converts
a
specified
block
of
internally
stored
floating
point
binary
numbers
into
floating
point
decimal format and types
them
out.
Four
significant
decimal
digits
of
the
normalized
fraction
are
typed.
The
location
of
the
block,
length
of
the
block,
and number
of
outputs
per
line
are
specified
by the
user.
USAGE
This
program
is
a
subroutine,
and
thus
must be
"called"
by
the
users'
pro-
gram.
The
calling
sequence,
given,below,
must
start
in
the
left-half
in-
struction
of
the
word.
where
+
TRA
06100 +
PZE
XXXXO
+
PZE
OOYYO
+
PZE
OOZZO
Return
XXIX
is
origin
'(initial
location)
of
block
to
be
output
OOY!
is
number
(octal)
of
numbers
in
block
OOZZ
is
number
(octal)
of
numbers
to
be typed on a
line
The
format
for
each
output
number
is
as
follows:
Sign
of
number,
four
digits
of
fraction,
sign
of
exponent, one
digit
exponent.
The
sign
of
a
positive
exponent
will
be
suppressed
with
a
space.
Examples: -362.5
will
appear
as
-3625 3 and + 0.03625
will
appear
as
+3625
-
1.
A
carriage
return
will
occur
prior
to
but
not
following
each
block
typeout.
RESTRICTIONS
The
numbers must be
in
normalized
floating
point
format.
10
The
magnitude
of
a number
must_~o
no
greater
than
10
or,
unless
it
is
identically
zero,
less
than
10 •
The
Tab-Carriage
Return Switch on
the
typewriter
must be
in
the
Carriage
Return
position.
TITLE:
- 2 -
SHORT
FORM
F
LOA
T 1
NG
PO
,I
NT
,OUTPUT
0610 -0763
0610.0
+,sAX'716q.0 +
CTl
0610.0
+
CTV
0620.0 +
TRA
7770.0
+
ClA
0000.0 -
CLA
0001.0
+ ClAOaCO.O'
'-
ClA
0001'.0
'+
ClA
0000.0, -
CLA
0004.0
+
CLA
0000.0 -
CLA
0001.0
+
ClA
7774.0 +
STO
7713.0
+
Tye
00
0.0+
TRA
7765.0
0620.0
-:-
STA
77.71.
1
,+
ADD
0762.0
..
:-
STA
0632.1 +
FCA
0000.0
+
XAR
OOOOeO
+
STA
7763.1
+.STA
7764.1 +
ARS
0024.0
~-STO
7162.0 +
CFL
0610.0
+
CTl
0630.0 +
XAR
0000.0 '
+
STA
7707.1 +
TYC
0010.0
+
TYC
0033.0'
+
TRA
77
6
7.
0
0630.0 '
.+
CTV
0610.0 +
CLA
7772.0
'+
SUB'
7775.0 +
STO
7772.0
+
ARS
0000.0
,+
TZE.73i6.o
+
C~A
7773.0 +
SUB
7775.0
+
STO
77L3.0 +
TZE
777.0.0
+
CLA
7767.0, +
ADD
0162.0
+
STO
7167.0 +
CFV
0610.0
+
CTV
0640.0 +
FCA
5216.0
0640.0
+
CFL
06~0.0
+
TZE
0704.0
+
TM
I 7772.1 +
TYC
0021.0
+
TRA
7773.0 +
TYC
0003.0
+
FST
7770.0 +
CLA
0661.0
+
SUB
7771.1 +
TZE
075~.0
+
TMI
075i.0
+
FCA
7170•0
+
XAR
0000.0 +'TZE 0670.0
+
Trv11
0670.0' +
TRA
0763.0
0650.0
+
CTV
0660.0 +
XAR
0000.0
+
FST
7776.0 +
CLA
7774•0
+
ADD
777~.0
+
STO
777~.0
+
FCA
7776.0 +
FOV
7712.0
'+
XAR
0000.0'
+
TZE
776~.1
+
TPL
7760.1 +
XAR
,0000.0
+
FST
7776.0 +
ARS
0000.0 ,
+
C~L
0710.0
,+
TRA,77
60
.0
- 3 -
PROGRAM·
TITLE:
SHORT
FORM'
FLOATING
POINT
OUTPUT
0660.0 +
TRA.
7764.1
°7~Q·0
+
SUB
7.766.0 +
ADD
7771.0 +
ALS·
ob04.0
+
CLA.
oooo~o
- C
LA
001
7 • 0 . +
STO
7771.0 +
XAR
0000.0
+·TZE
0000.0
-
CLA
0000.0 +
MPY
7767.0 +
ADD
7771.0
+
CLA
0000.0 .-
CLA
0002.0 . +
ALS
0004.0 +
STO
7771.0
+
CLA
0000.0 ..
CLA
0000.1
+
XAR.
0000.0 +
MPY
7767.0
+
CLA
0000.0 -
CLA
0000.0
+
ADD
77]1.0
+
AlS
0027.0
+
CTl
3~~4.0
+
FST
'1071.0 +
eTl
071):0.0
+
TRA
7760.0
.-
ClA
0000.0 -
ClA
0007.0 +
CLA
0000.0 -
CLA
0005.0
067
0
00
..
+
TRA
7761.0
07"40.0
+
eTL
0670~0
+
ADD
7767.0 +
STO
7771.0
+
CTV
0660.0·
'+
XAR
0000.0 +
TYW
7771.1 +
CLA
77~5.0
+
FST
7776.0. +
CLA
7775.0 +
ALS
0043.0' +
TZE
7~~.1
'+
SUB
7774.0 +
STO
·7775.0 +
Tt'--11
7770.0 +
TYC
0
.0
+
FCA
7776.0 +
FMP
77~2.0
+
ADD
7766~0
+
STO
77~1.0
+
XAR
0000.0 +
TZE
77
1.1 . +
T'fW
7771. 1 +
TRA
06
1.0
+
TM
I 7761. 1 . +
XAR
0000.0
"+
SUB
6000.0 -
CLA
°
00.0
+'CTL 0700.0 +
TRA
7760.0 +
CLA
0002.1 -
PNC
0000.0
0700.0 +
FST
7776.0 0750.0 . +
TYC
7764.0
+
FDV
7772.0, +
CLA
7~62.0
+
CLA
777"5.0
+
ADD
7774.0 +
CTl
0
30.0
+
TRA
1160.0
-'.-
STO
7775.0 +
ARS
0000.0 -
DSl
4102.0 -
DSL
Ii
02.0
+
CTl
0710.0 +
TRA
7760.0 +
CTl
0750.0 +
TRA
7764.0
+
ClA
0706.0 +
TYC
7760.0 +
CLA
7771.0 . +
TMI
7766.1
+
CTL
0750.0 +
TRA
7760.0 +
CLA
0707.0
'+
Tye 7767.0
+
FSB
6102.0
..:
DS
l
41
1
3.0
+
TRA
7760.0 +
CLA
0760.0
+
FSB
7156. 1 +
DIS
6102.0 +
TYC
7767.0
'+
TRA
7760.0
0710.0 ' +
FAD
77l6.1
07
6
0.0
-.
PTW
751~2.0
+
FCA
0666.0 -
PTW
75')6. 1 '
+
XAR
0000.0 +
TZE
77
7.
0 +
CTL
0750.0. +
TRA
7660~0
,+'
TMI
7767.0 +
XAR
0000.0 +
ClA
0000.0 -
CLA
0
02.0
+
FDV
7772.0. +
FST
7776
•.
0 +
CTL
0650.0 +
TRA
7760.0
+
ClA
7775~0
+
ADD
7774.0'
.+
STD.
7775.0 +
FCA
7776.0
+
CTl
0720.0 +
TRA
7760.0
+
CTL
0720.0 ' +
TRA
7760. 1
0720.0 +
ALS
0001.0
+
XAR
0000.0
+
STA
7762.1 +
XAR
0000.0
+
ARS
0000.0 +
ARS
0000.0
+
MPY
7~67.0
+
ALS
0004.0
+
ADD
0 65.0 +
STO
7771.0
+
'XAR
0000.0'
+
MPY
7767.0
+
CTL·OljO.O
+
TRA
7760.0
+
CLA.O
00.0 -
CLA
0005.0

Navigation menu