as/cmd/SRA/sra_m.casl

   1 SLA2    START   BEGIN
   2 BEGIN   LAD     GR1,#FFFD
   3         SLA     GR1,2
   4         RET
   5         END