projects
/
pdp8.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
Add README.md
[pdp8.git]
/
f4
/
FRTSRC
/
sngl.ra
1
/ SUBROUTINE SNGL - DBL PREC TO REAL
2
/
3
/ VERSION 5A 4-26-77 MH
4
/
5
SECT SNGL
6
DPCHK
7
BASE 0
8
FLDA 0
9
STARTD
10
FSTA RETRN
11
FADD TWO
12
FSTA 3
13
FLDA% 3
14
FSTA 3
15
STARTE
16
FLDA% 3
17
STARTF
18
JA RETRN
19
RETRN, 0;0
20
TWO, 0;2
21
\f