*DECK C$DTENS 
          IDENT  C$DTENS
          TITLE  CBDTENS - DP TABLE OF POWERS OF TENS 
          MACHINE  ANY
          COMMENT  DP TABLE OF POWERS OF TENS 
          SPACE  4
**        CBDTENS - DP TABLE OF POWERS OF TENS
* 
*         CONTAINS DP POWERS OF TEN FROM 10'18 TO 10'-18
* 
*         ENTRY C.DTENS+2J HAS THE VALUE 10'(-J)
* 
*         USED TO SCALE (I.E. MULTIPLY OR DIVIDE) DP COMP-2 NUMBERS 
*         BY A POWER OF 10
* 
          SPACE  2
 DTENSTBL MICRO 1,,*C.DTENS*
          ENTRY  C.DTENS
*CALL DTENSTBL
          END 
