| /dports/math/scilab/scilab-6.1.1/scilab/modules/cacsd/src/slicot/ |
| H A D | mb01rx.f | 167 LOGICAL LSIDE, LTRANS, LUPLO
181 LSIDE = LSAME( SIDE, 'L' )
185 IF( ( .NOT.LSIDE ).AND.( .NOT.LSAME( SIDE, 'R' ) ) )THEN
198 $ ( ( ( LSIDE .AND. .NOT.LTRANS ) .OR.
199 $ ( .NOT.LSIDE .AND. LTRANS ) ) .AND. LDA.LT.M ) .OR.
200 $ ( ( ( LSIDE .AND. LTRANS ) .OR.
201 $ ( .NOT.LSIDE .AND. .NOT.LTRANS ) ) .AND. LDA.LT.N ) ) THEN
204 $ ( LSIDE .AND. LDB.LT.N ) .OR.
205 $ ( .NOT.LSIDE .AND. LDB.LT.M ) ) THEN
245 IF( LSIDE ) THEN
|
| H A D | mb01ud.f | 114 LOGICAL LSIDE, LTRANS local
129 LSIDE = LSAME( SIDE, 'L' )
132 IF( ( .NOT.LSIDE ).AND.( .NOT.LSAME( SIDE, 'R' ) ) )THEN
140 ELSE IF( LDH.LT.1 .OR. ( LSIDE .AND. LDH.LT.M ) .OR.
141 $ ( .NOT.LSIDE .AND. LDH.LT.N ) ) THEN
184 IF( LSIDE ) THEN
|
| /dports/lang/gcc12-devel/gcc-12-20211205/gcc/testsuite/gfortran.dg/graphite/ |
| H A D | pr83887.f90 | 11 LOGICAL LSIDE, NOCONJ, NOUNIT, UPPER local
18 LSIDE = scan( SIDE , 'Ll' )>0
19 IF( LSIDE )THEN
|
| /dports/lang/gcc8/gcc-8.5.0/gcc/testsuite/gfortran.dg/graphite/ |
| H A D | pr83887.f90 | 11 LOGICAL LSIDE, NOCONJ, NOUNIT, UPPER local
18 LSIDE = scan( SIDE , 'Ll' )>0
19 IF( LSIDE )THEN
|
| /dports/lang/gcc10/gcc-10.3.0/gcc/testsuite/gfortran.dg/graphite/ |
| H A D | pr83887.f90 | 11 LOGICAL LSIDE, NOCONJ, NOUNIT, UPPER local
18 LSIDE = scan( SIDE , 'Ll' )>0
19 IF( LSIDE )THEN
|
| /dports/devel/riscv64-none-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/graphite/ |
| H A D | pr83887.f90 | 11 LOGICAL LSIDE, NOCONJ, NOUNIT, UPPER local
18 LSIDE = scan( SIDE , 'Ll' )>0
19 IF( LSIDE )THEN
|
| /dports/lang/gcc11-devel/gcc-11-20211009/gcc/testsuite/gfortran.dg/graphite/ |
| H A D | pr83887.f90 | 11 LOGICAL LSIDE, NOCONJ, NOUNIT, UPPER local
18 LSIDE = scan( SIDE , 'Ll' )>0
19 IF( LSIDE )THEN
|
| /dports/devel/arm-none-eabi-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/graphite/ |
| H A D | pr83887.f90 | 11 LOGICAL LSIDE, NOCONJ, NOUNIT, UPPER local
18 LSIDE = scan( SIDE , 'Ll' )>0
19 IF( LSIDE )THEN
|
| /dports/devel/riscv32-unknown-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/graphite/ |
| H A D | pr83887.f90 | 11 LOGICAL LSIDE, NOCONJ, NOUNIT, UPPER local
18 LSIDE = scan( SIDE , 'Ll' )>0
19 IF( LSIDE )THEN
|
| /dports/lang/gcc9-devel/gcc-9-20211007/gcc/testsuite/gfortran.dg/graphite/ |
| H A D | pr83887.f90 | 11 LOGICAL LSIDE, NOCONJ, NOUNIT, UPPER local
18 LSIDE = scan( SIDE , 'Ll' )>0
19 IF( LSIDE )THEN
|
| /dports/devel/aarch64-none-elf-gcc/gcc-8.4.0/gcc/testsuite/gfortran.dg/graphite/ |
| H A D | pr83887.f90 | 11 LOGICAL LSIDE, NOCONJ, NOUNIT, UPPER local
18 LSIDE = scan( SIDE , 'Ll' )>0
19 IF( LSIDE )THEN
|
| /dports/lang/gcc9-aux/gcc-9.1.0/gcc/testsuite/gfortran.dg/graphite/ |
| H A D | pr83887.f90 | 11 LOGICAL LSIDE, NOCONJ, NOUNIT, UPPER local
18 LSIDE = scan( SIDE , 'Ll' )>0
19 IF( LSIDE )THEN
|
| /dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/testsuite/gfortran.dg/graphite/ |
| H A D | pr83887.f90 | 11 LOGICAL LSIDE, NOCONJ, NOUNIT, UPPER local
18 LSIDE = scan( SIDE , 'Ll' )>0
19 IF( LSIDE )THEN
|
| /dports/devel/avr-gcc/gcc-10.2.0/gcc/testsuite/gfortran.dg/graphite/ |
| H A D | pr83887.f90 | 11 LOGICAL LSIDE, NOCONJ, NOUNIT, UPPER local
18 LSIDE = scan( SIDE , 'Ll' )>0
19 IF( LSIDE )THEN
|
| /dports/devel/riscv64-gcc/gcc-8.3.0/gcc/testsuite/gfortran.dg/graphite/ |
| H A D | pr83887.f90 | 11 LOGICAL LSIDE, NOCONJ, NOUNIT, UPPER local
18 LSIDE = scan( SIDE , 'Ll' )>0
19 IF( LSIDE )THEN
|
| /dports/lang/gcc11/gcc-11.2.0/gcc/testsuite/gfortran.dg/graphite/ |
| H A D | pr83887.f90 | 11 LOGICAL LSIDE, NOCONJ, NOUNIT, UPPER local
18 LSIDE = scan( SIDE , 'Ll' )>0
19 IF( LSIDE )THEN
|
| /dports/lang/gcc10-devel/gcc-10-20211008/gcc/testsuite/gfortran.dg/graphite/ |
| H A D | pr83887.f90 | 11 LOGICAL LSIDE, NOCONJ, NOUNIT, UPPER local
18 LSIDE = scan( SIDE , 'Ll' )>0
19 IF( LSIDE )THEN
|
| /dports/lang/gcc9/gcc-9.4.0/gcc/testsuite/gfortran.dg/graphite/ |
| H A D | pr83887.f90 | 11 LOGICAL LSIDE, NOCONJ, NOUNIT, UPPER local
18 LSIDE = scan( SIDE , 'Ll' )>0
19 IF( LSIDE )THEN
|
| /dports/science/InsightToolkit/ITK-5.0.1/Modules/ThirdParty/VNL/src/vxl/v3p/netlib/blas/ |
| H A D | dtrmm.f | 135 LOGICAL LSIDE, NOUNIT, UPPER
146 LSIDE = LSAME( SIDE , 'L' )
147 IF( LSIDE )THEN
156 IF( ( .NOT.LSIDE ).AND.
201 IF( LSIDE )THEN
|
| /dports/multimedia/opentoonz/opentoonz-1.5.0/thirdparty/openblas/xianyi-OpenBLAS-e6e87a2/reference/ |
| H A D | dtrmmf.f | 135 LOGICAL LSIDE, NOUNIT, UPPER
146 LSIDE = LSAME( SIDE , 'L' )
147 IF( LSIDE )THEN
156 IF( ( .NOT.LSIDE ).AND.
201 IF( LSIDE )THEN
|
| /dports/math/xlife++/xlifepp-sources-v2.0.1-2018-05-09/ext/LAPACKBLAS/BLAS/SRC/ |
| H A D | dtrmm.f | 209 LOGICAL LSIDE,NOUNIT,UPPER
218 LSIDE = LSAME(SIDE,'L')
219 IF (LSIDE) THEN
228 IF ((.NOT.LSIDE) .AND. (.NOT.LSAME(SIDE,'R'))) THEN
269 IF (LSIDE) THEN
|
| H A D | strmm.f | 209 LOGICAL LSIDE,NOUNIT,UPPER
218 LSIDE = LSAME(SIDE,'L')
219 IF (LSIDE) THEN
228 IF ((.NOT.LSIDE) .AND. (.NOT.LSAME(SIDE,'R'))) THEN
269 IF (LSIDE) THEN
|
| /dports/math/xlapack/lapack-3.10.0/BLAS/SRC/ |
| H A D | strmm.f | 206 LOGICAL LSIDE,NOUNIT,UPPER
215 LSIDE = LSAME(SIDE,'L')
216 IF (LSIDE) THEN
225 IF ((.NOT.LSIDE) .AND. (.NOT.LSAME(SIDE,'R'))) THEN
266 IF (LSIDE) THEN
|
| H A D | dtrmm.f | 206 LOGICAL LSIDE,NOUNIT,UPPER
215 LSIDE = LSAME(SIDE,'L')
216 IF (LSIDE) THEN
225 IF ((.NOT.LSIDE) .AND. (.NOT.LSAME(SIDE,'R'))) THEN
266 IF (LSIDE) THEN
|
| /dports/science/lammps/lammps-stable_29Sep2021/lib/linalg/ |
| H A D | dtrmm.f | 209 LOGICAL LSIDE,NOUNIT,UPPER
218 LSIDE = LSAME(SIDE,'L')
219 IF (LSIDE) THEN
228 IF ((.NOT.LSIDE) .AND. (.NOT.LSAME(SIDE,'R'))) THEN
269 IF (LSIDE) THEN
|