<div id='wikitext'>
<pre><b> File: SNGL.LS of Disk: V50/Source/Source-Listing-RALF-1</b></pre>
<pre><b>(Source file text) </b></pre>
<hr />
<pre>

RALF V50A    8-APR-92    PAGE 1

            /R=SNGL(D) DOUBLE PREC. TO REAL
            /
            /
            / VERSION 50A 23-MAY-80 WVDM
            /
            /
                    SECT    SNGL
                    DPCHK
                    BASE    0
00000 0200          FLDA    0
00001 0006          STARTD
00002 6400          FSTA    RETRN
00003 0014  
00004 1400          FADD    TWO
00005 0016  
00006 6201          FSTA    3
00007 0601          FLDA%   3
00010 6201          FSTA    3
00011 0050          STARTE
00012 0601          FLDA%   3
00013 0005          STARTF
00014 0000  RETRN,  0;0
00015 0000  
00016 0000  TWO,    0;2
00017 0002  
RALF V50A    8-APR-92    PAGE 2

            
RALF V50A    8-APR-92    PAGE 2-1

NO ERRORS 
3 SYMBOLS, NO ABS REFS 

 #      C 00000   #MAIN  S 00000   RETRN    00014   SNGL   S 00020  
 TWO      00016  
</pre>
<hr/>
</div>