/dports/math/cmlib/cmlib-3.0_8/src/nl2sn/ |
H A D | lsvmin.f | 83 REAL B, SMINUS, SPLUS, T, XMINUS, XPLUS 140 SMINUS = ABS(XMINUS) 150 SMINUS = SMINUS + ABS(X(I) + L(JI)*XMINUS) 152 30 IF (SMINUS .GT. SPLUS) XPLUS = XMINUS
|
/dports/math/cmlib/cmlib-3.0_8/src/dnl2sn/ |
H A D | dlsvmn.f | 84 DOUBLE PRECISION B, SMINUS, SPLUS, T, XMINUS, XPLUS 143 SMINUS = DABS(XMINUS) 153 SMINUS = SMINUS + DABS(X(I) + L(JI)*XMINUS) 155 30 IF (SMINUS .GT. SPLUS) XPLUS = XMINUS
|
/dports/lang/pcc/pcc-1.1.0/f77/fcom/ |
H A D | tokens | 80 SMINUS
|
H A D | gram.expr | 50 | SMINUS { $$ = OPMINUS; }
|
H A D | gram.head | 28 %left SPLUS SMINUS
|
H A D | gram.dcl | 292 | letter SMINUS letter
|
H A D | lex.c | 869 { '-', SMINUS, },
|
/dports/science/afni/afni-AFNI_21.3.16/src/f2c/ |
H A D | tokdefs.h | 81 #define SMINUS 81 macro
|
H A D | tokens | 81 SMINUS
|
H A D | gram.expr | 55 | SMINUS { $$ = OPMINUS; }
|
H A D | gram.dcl | 357 | letter SMINUS letter
|
H A D | gram.ccc | 81 # define SMINUS 81 756 "SMINUS", 81, 913 "letgroup : letter SMINUS letter", 943 "addop : SMINUS",
|
/dports/lang/f2c/f2c-20200916/src/ |
H A D | tokdefs.h | 81 #define SMINUS 81 macro
|
H A D | tokens | 81 SMINUS
|
H A D | gram.expr | 59 | SMINUS { $$ = OPMINUS; }
|
H A D | gram.dcl | 357 | letter SMINUS letter
|
H A D | gram.head | 94 %left SPLUS SMINUS
|
/dports/math/reduce/Reduce-svn5758-src/contrib/ortocartan/ |
H A D | ortcsl.lis | 1037 (de SMINUS (E) (COND 1069 ((EQN (CDR E) -1) (SMINUS (CAR E))) 1337 ((QUOTE MINUS) (SMINUS (CADR E))) 1370 ((QUOTE MINUS) (SMINUS (CADR E))) 1768 ((QUOTE MINUS) (SMINUS U)) 2664 (SETQ HELP (SMINUS HELP))) 2807 (OR (ZEROP I) (EQN R 0) (SETQ R (SMINUS R))) 3044 (SMINUS (PICKEL RC (LIST 1 1))) (SMINUS (PICKEL RC (LIST 2 2))) 3045 (SMINUS (PICKEL RC (LIST 3 3))) ))) 3126 (RPLACA RE (SMINUS (CAR RE))) )))) [all …]
|
H A D | elliscsl.lis | 45 (OR (EQN LE 0) (SETQ V (SMINUS V))) 256 (SMINUS (DERIV (NTH COORD (ADD1 A))(PICKEL LVELO VB))) 294 (T (SMINUS (PICKEL ROTDD LAB)) ))) 575 (SMINUS (DERIV VC(SETQ PBC(PICKEL SHEARDU LIJ))))W)) 653 (SMINUS (DERIV (NTH COORD (ADD1 D)) 813 (SPLUS (LIST ROT (SMINUS SHEAR))) )) 898 (SETQ W (SMINUS W))) 958 (SMINUS (PICKEL SHEARDD V2)))) 993 (SMINUS (PICKEL ROTDD V3)) 998 (SMINUS (PICKEL ROTDD V4)) [all …]
|
H A D | eulagcsl.lis | 191 (SETQ DUPLAG2 (SMINUS (DERIV (CAR LE) DUPLAG1)))
|
H A D | ncurvcsl.lis | 249 (SETQ V (SMINUS (DERIV (NTH COORD (ADD1 L)) (PICKEL GAM LIJK))))
|
/dports/math/math77/MATH77/ |
H A D | divset.f | 357 DOUBLE PRECISION B, SMINUS, SPLUS, T, XMINUS, XPLUS local 406 SMINUS = abs(XMINUS) 416 SMINUS = SMINUS + abs(X(I) + L(JI)*XMINUS) 418 30 IF (SMINUS .GT. SPLUS) XPLUS = XMINUS 2409 DOUBLE PRECISION B, BLJI, SMINUS, SPLUS, T, YI local 2453 SMINUS = ZERO 2458 SMINUS = SMINUS + abs(BLJI - X(I)) 2460 IF (SMINUS .GT. SPLUS) B = -B
|
H A D | sivset.f | 357 REAL B, SMINUS, SPLUS, T, XMINUS, XPLUS local 406 SMINUS = abs(XMINUS) 416 SMINUS = SMINUS + abs(X(I) + L(JI)*XMINUS) 418 30 IF (SMINUS .GT. SPLUS) XPLUS = XMINUS 2409 REAL B, BLJI, SMINUS, SPLUS, T, YI local 2453 SMINUS = ZERO 2458 SMINUS = SMINUS + abs(BLJI - X(I)) 2460 IF (SMINUS .GT. SPLUS) B = -B
|
/dports/science/afni/afni-AFNI_21.3.16/src/f2cdir/ |
H A D | gram.head | 93 %left SPLUS SMINUS
|
/dports/math/R/R-4.1.2/src/library/stats/src/ |
H A D | portsrc.f | 2597 DOUBLE PRECISION B, BLJI, SMINUS, SPLUS, T, YI 2642 SMINUS = ZERO 2647 SMINUS = SMINUS + DABS(BLJI - X(I)) 2649 IF (SMINUS .GT. SPLUS) B = -B 2998 DOUBLE PRECISION B, SMINUS, SPLUS, T, XMINUS, XPLUS 3047 SMINUS = DABS(XMINUS) 3057 SMINUS = SMINUS + DABS(X(I) + L(JI)*XMINUS) 3059 30 IF (SMINUS .GT. SPLUS) XPLUS = XMINUS
|