Searched defs:ME08B (Results 1 – 1 of 1) sorted by relevance
61 SUBROUTINE ME08B (A,Q,B,N,IA) subroutine62 REAL A(IA,*),Q(2,*),B(IA,*)66 10 A(2,I)=A(2,I)-Q(2,1)*B(1,I)-Q(1,1)*B(2,I)