/dports/math/PDL/PDL-2.019/Lib/Slatec/slatec/ |
H A D | xermsg.f | 2 SUBROUTINE XERMSG (LIBRAR, SUBROU, MESSG, NERR, LEVEL) argument 187 CHARACTER*(*) LIBRAR, SUBROU, MESSG 216 CALL XERSVE (LIBRAR, SUBROU, MESSG, 1, NERR, LEVEL, KOUNT) 225 XSUBR = SUBROU 249 I = MIN(LEN(SUBROU), 16) 250 TEMP(22:21+I) = SUBROU(1:I)
|
H A D | xersve.f | 2 SUBROUTINE XERSVE (LIBRAR, SUBROU, MESSG, KFLAG, NERR, LEVEL, argument 62 CHARACTER*(*) LIBRAR, SUBROU, MESSG 113 SUB = SUBROU
|
H A D | xercnt.f | 2 SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) argument 57 CHARACTER*(*) LIBRAR, SUBROU, MESSG
|
/dports/math/maxima/maxima-5.43.2/src/numerical/slatec/fortran/ |
H A D | xermsg.f | 2 SUBROUTINE XERMSG (LIBRAR, SUBROU, MESSG, NERR, LEVEL) argument 187 CHARACTER*(*) LIBRAR, SUBROU, MESSG local 216 CALL XERSVE (LIBRAR, SUBROU, MESSG, 1, NERR, LEVEL, KOUNT) 225 XSUBR = SUBROU 249 I = MIN(LEN(SUBROU), 16) 250 TEMP(22:21+I) = SUBROU(1:I)
|
H A D | xersve.f | 2 SUBROUTINE XERSVE (LIBRAR, SUBROU, MESSG, KFLAG, NERR, LEVEL, argument 62 CHARACTER*(*) LIBRAR, SUBROU, MESSG local 113 SUB = SUBROU
|
H A D | xercnt.f | 2 SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) argument 57 CHARACTER*(*) LIBRAR, SUBROU, MESSG local
|
/dports/math/slatec/src/ |
H A D | xermsg.f | 2 SUBROUTINE XERMSG (LIBRAR, SUBROU, MESSG, NERR, LEVEL) argument 187 CHARACTER*(*) LIBRAR, SUBROU, MESSG 216 CALL XERSVE (LIBRAR, SUBROU, MESSG, 1, NERR, LEVEL, KOUNT) 225 XSUBR = SUBROU 249 I = MIN(LEN(SUBROU), 16) 250 TEMP(22:21+I) = SUBROU(1:I)
|
H A D | xersve.f | 2 SUBROUTINE XERSVE (LIBRAR, SUBROU, MESSG, KFLAG, NERR, LEVEL, argument 62 CHARACTER*(*) LIBRAR, SUBROU, MESSG 113 SUB = SUBROU
|
H A D | xercnt.f | 2 SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) argument 57 CHARACTER*(*) LIBRAR, SUBROU, MESSG
|
/dports/math/scilab/scilab-6.1.1/scilab/modules/elementary_functions/src/fortran/slatec/ |
H A D | xermsg.f | 2 SUBROUTINE XERMSG (LIBRAR, SUBROU, MESSG, NERR, LEVEL) argument 187 CHARACTER*(*) LIBRAR, SUBROU, MESSG local 216 CALL XERSVE (LIBRAR, SUBROU, MESSG, 1, NERR, LEVEL, KOUNT) 225 XSUBR = SUBROU 249 I = MIN(LEN(SUBROU), 16) 250 TEMP(22:21+I) = SUBROU(1:I)
|
H A D | xersve.f | 2 SUBROUTINE XERSVE (LIBRAR, SUBROU, MESSG, KFLAG, NERR, LEVEL, argument 62 CHARACTER*(*) LIBRAR, SUBROU, MESSG local 129 SUB = SUBROU
|
H A D | xercnt.f | 2 SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) argument 57 CHARACTER*(*) LIBRAR, SUBROU, MESSG local
|
/dports/math/octave/octave-6.4.0/liboctave/external/slatec-err/ |
H A D | xermsg.f | 2 SUBROUTINE XERMSG (LIBRAR, SUBROU, MESSG, NERR, LEVEL) argument 187 CHARACTER*(*) LIBRAR, SUBROU, MESSG local 217 CALL XERSVE (LIBRAR, SUBROU, MESSG, 1, NERR, LEVEL, KOUNT) 226 XSUBR = SUBROU 252 I = MIN(LEN(SUBROU), 16) 253 TEMP(22:21+I) = SUBROU(1:I)
|
H A D | xersve.f | 2 SUBROUTINE XERSVE (LIBRAR, SUBROU, MESSG, KFLAG, NERR, LEVEL, argument 62 CHARACTER*(*) LIBRAR, SUBROU, MESSG local 113 SUB = SUBROU
|
H A D | xercnt.f | 2 SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) argument 57 CHARACTER*(*) LIBRAR, SUBROU, MESSG local
|
/dports/cad/calculix-ccx/CalculiX/ccx_2.18/src/ |
H A D | ddeabm.f | 1264 SUBROUTINE XERMSG (LIBRAR, SUBROU, MESSG, NERR, LEVEL) argument 1449 CHARACTER*(*) LIBRAR, SUBROU, MESSG local 1478 CALL XERSVE (LIBRAR, SUBROU, MESSG, 1, NERR, LEVEL, KOUNT) 1487 XSUBR = SUBROU 1511 I = MIN(LEN(SUBROU), 16) 1512 TEMP(22:21+I) = SUBROU(1:I) 1856 SUBROUTINE XERSVE (LIBRAR, SUBROU, MESSG, KFLAG, NERR, LEVEL, argument 1916 CHARACTER*(*) LIBRAR, SUBROU, MESSG local 1967 SUB = SUBROU 4541 SUBROUTINE XERCNT (LIBRAR, SUBROU, MESSG, NERR, LEVEL, KONTRL) argument [all …]
|
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/util/ |
H A D | dgami.f | 1039 SUBROUTINE XERMSG (LIBRAR, SUBROU, MESSG, NERR, LEVEL) argument 1041 CHARACTER*(*) LIBRAR, SUBROU, MESSG local 1043 call errquit(SUBROU//MESSG,NERR,0)
|
/dports/science/nwchem-data/nwchem-7.0.2-release/src/util/ |
H A D | dgami.f | 1039 SUBROUTINE XERMSG (LIBRAR, SUBROU, MESSG, NERR, LEVEL) argument 1041 CHARACTER*(*) LIBRAR, SUBROU, MESSG local 1043 call errquit(SUBROU//MESSG,NERR,0)
|
/dports/math/cmlib/cmlib-3.0_8/doc/nl2sn/ |
H A D | sumsl | 346 C GRADIENT) BY REVERSE COMMUNICATION RATHER THAN BY WRITING SUBROU-
|
/dports/math/cmlib/cmlib-3.0_8/doc/dnl2sn/ |
H A D | dsumsl | 346 C GRADIENT) BY REVERSE COMMUNICATION RATHER THAN BY WRITING SUBROU-
|