ASMB,R,L,B,T,C HED 1-05470-94080-1 NAM PGM48 SP ADD ERS & LISTING NAM PGM48 * * PURPOSE: * PGM48 IS A 5470A MICROPROGRAM FOR SINGLE PRECISION * ADDITION WHERE ONLY BLOCK NA DATA IS TO BE * DOWNSCALED BY K1. * * NA _ K1 * NA + NB. * * CALLING SEQUENCE AND OPERATION: * SEE RUN7. * * SIZE: 17 WORDS (21 OCTAL) * ENT PGM48 * PGM48 OCT 051020 NISK1, MODE4, K1, 10 WORDS. * OCT 4003 1 STDATBSY OCT 4000 OCT 4002 2 Q _ DAT[K1]. OCT 2400 OCT 4004 3 RRA; AR _ 0. OCT 0300 OCT 4324 4 RJC; T _ MD[A]; OCT 5400 MULT. OCT 4130 5 WJC; XT _ MD[C]. OCT 6000 OCT 4000 6 AR+TR OCT 0200 OCT 4011 7 WRA; MD _ A[K1*A+C]. OCT 1000 OCT 3777 10 JMP Z0Y0X1 OCT 7774 * END