+ LDA* APII POINTER TO MATRIX
+ STA MP11 STORE M11
+ ADD =2 ADD 2
+ STA MP12 STORE M12
+ ADD =2 ADD 2
+ STA MP21 STORE M21
+ ADD =2 ADD 2
+ STA MP22 STORE M22
+ IRS APII JUMP TO NEXT ARGUMENT (X)
+*
+ LDA* APII LOAD X VALUE
+ STA XP1 STORE TO X-POINTER
+ STA XP2 STORE TO X-POINTER
+ IRS APII JUMP TO NEXT ARGUMENT (Y)
+ LDA* APII LOAD Y VALUE
+ STA YP1 STORE TO Y-POINTER
+ STA YP2 STORE TO Y-POINTER
+ IRS APII CORRECT RETURN ADDRESS
+ IRS APII FOR FORTRANIV COMPATIBILITY