Home
last modified time | relevance | path

Searched refs:XR1 (Results 1 – 25 of 127) sorted by relevance

123456

/dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/lang/gcc6-aux/gcc-6-20180516/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/lang/gcc12-devel/gcc-12-20211205/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/lang/gcc9/gcc-9.4.0/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/devel/arm-none-eabi-gcc492/gcc-4.9.2/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/devel/riscv64-gcc/gcc-8.3.0/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/devel/avr-gcc/gcc-10.2.0/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/lang/gcc48/gcc-4.8.5/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/lang/gcc11/gcc-11.2.0/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/devel/zpu-gcc/zpu-toolchain-1.0/toolchain/gcc/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/lang/gcc9-aux/gcc-9.1.0/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/lang/gcc10/gcc-10.3.0/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/lang/gcc9-devel/gcc-9-20211007/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/lang/gcc8/gcc-8.5.0/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/lang/gnat_util/gcc-6-20180516/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/devel/zpu-binutils/zpu-toolchain-1.0/toolchain/gcc/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/devel/mingw32-gcc/gcc-4.8.1/gcc/testsuite/ada/acats/tests/c8/
H A Dc85005a.ada91 XR1 : RECORD1 RENAMES R1; variable
218 GENERIC1 (XI1, XA1, XR1, XP1, XV1, XT1, XK1);
231 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(1)) THEN
252 PROC1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
262 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(2)) THEN
283 CHK_TASK.ENTRY1(XI1, XA1, XR1, XP1, XV1, XT1, XK1);
293 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(3)) THEN
316 XR1 := (D => 1, FIELD1 => XR1.FIELD1 + 1);
330 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(4)) THEN
367 IF XR1 /= (D => 1, FIELD1 => IDENT_INT(5)) THEN
/dports/lang/pcc/pcc-1.1.0/arch/pdp10/
H A Dmacdefs.h181 #define XR1 021 macro
205 { XR0, XR1, -1 }, \
206 { XR1, XR2, -1 }, \
220 { R0, R1, XR1, -1 }, \
222 { R2, R3, XR1, XR3, -1 }, \
236 #define RETREG(x) (szty(x) == 2 ? XR1 : R1)
/dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/SRC/
H A Ddlaln2.f249 $ UR22, XI1, XI2, XR1, XR2
438 XR1 = ( SCALE*BR1 )*UR11R - XR2*( UR11R*UR12 )
441 X( 2, 1 ) = XR1
443 X( 1, 1 ) = XR1
446 XNORM = MAX( ABS( XR1 ), ABS( XR2 ) )
576 XR1 = UR11R*BR1 - UI11R*BI1 - UR12S*XR2 + UI12S*XI2
580 X( 2, 1 ) = XR1
584 X( 1, 1 ) = XR1
589 XNORM = MAX( ABS( XR1 )+ABS( XI1 ), ABS( XR2 )+ABS( XI2 ) )

123456