Home
last modified time | relevance | path

Searched refs:issign (Results 1 – 24 of 24) sorted by relevance

/dports/science/siesta/siesta-4.1.5/Util/Vibra/Src/
H A Dparse.f52 . isexp(0:maxl+1), isinteger, issign(0:maxl+1),
67 issign(0) = .false.
77 issign(i) = (c.eq.'+' .or. c.eq.'-')
80 . .not.issign(i))
86 issign(ll+1) = .false.
133 if (issign(i) .and. isblank(i-1) .and.
140 . (isblank(i-1) .or. isdigit(i-1) .or. issign(i-1)) .and.
144 . (isdigit(i+1) .or. issign(i+1))) goto 20
145 if (issign(i) .and. isexp(i-1) .and. isdigit(i+1)) goto 20
153 if (issign(i)) nsign = nsign + 1
/dports/science/siesta/siesta-4.1.5/Src/
H A Dparsing.f70 . isblank, isdigit, isdot, isexp, issign, isother
89 issign(0) = .false.
99 issign(i) = (c.eq.'+' .or. c.eq.'-')
102 . .not.issign(i))
108 issign(ll+1) = .false.
156 if (issign(i) .and. isblank(i-1) .and.
163 . (isblank(i-1) .or. isdigit(i-1) .or. issign(i-1)) .and.
167 . (isdigit(i+1) .or. issign(i+1))) goto 20
168 if (issign(i) .and. isexp(i-1) .and. isdigit(i+1)) goto 20
176 if (issign(i)) nsign = nsign + 1
/dports/lang/swi-pl/swipl-8.2.3/packages/nlp/
H A Dporter_stem.c524 #define issign(c) ((c) == '-' || (c) == '+' ) macro
549 if ( issign(*s) && se-s > 1 && isdigit(s[1]) ) in tokenizeA()
568 (isdigit(s[1]) || (s+3 <= se && issign(s[1]) && isdigit(s[2]))) ) in tokenizeA()
621 if ( issign(*s) && se-s > 1 && isdigit(s[1]) ) in tokenizeW()
640 (isdigit(s[1]) || (s+3 <= se && issign(s[1]) && isdigit(s[2]))) ) in tokenizeW()
/dports/science/cdcl/dcl-5.4.8-C/f2csrc/
H A Dsle_lread.c30 #define issign(x) (f__ltab[x+1]&SG) macro
156 if (issign(ch)) in l_R()
164 if (issign(ch)) { in l_R()
/dports/lang/ruby26/ruby-2.6.9/ext/date/
H A Ddate_strptime.c56 #define issign(c) ((c) == '-' || (c) == '+') macro
357 if (issign(str[si])) { in date__strptime_internal()
537 if (issign(str[si])) { in date__strptime_internal()
H A Ddate_parse.c60 #define issign(c) ((c) == '-' || (c) == '+') macro
113 while (s < ep && !issign(*s) && !isdigit(*s)) in s3e()
117 if (issign((unsigned char)*s)) in s3e()
165 while (s < ep && !issign(*s) && !isdigit(*s)) in s3e()
169 if (issign(*s)) { in s3e()
444 if (issign(*s)) { in date_zone_to_diff()
/dports/science/siconos/siconos-4.4.0/externals/netlib/dctemplates/F2CLIBS/libI77/
H A Dlread.c27 #define issign(x) (f__ltab[x+1]&SG) macro
169 if(issign(ch))
174 if(issign(ch))
/dports/science/afni/afni-AFNI_21.3.16/src/f2c/
H A Dlread.c34 #define issign(x) (f__ltab[x+1]&SG) macro
167 if (issign(ch))
171 if (issign(ch)) {
/dports/astro/pykep/pykep-2.6/src/third_party/cspice/
H A Dlread.c39 #define issign(x) (f__ltab[x+1]&SG) macro
177 if (issign(ch))
185 if (issign(ch)) {
/dports/astro/py-pykep/pykep-2.6/src/third_party/cspice/
H A Dlread.c39 #define issign(x) (f__ltab[x+1]&SG) macro
177 if (issign(ch))
185 if (issign(ch)) {
/dports/math/blis/blis-0.8.1/blastest/f2c/
H A Dlread.c56 #define issign(x) (f__ltab[x+1]&SG) macro
184 if (issign(ch)) in l_R()
192 if (issign(ch)) { in l_R()
/dports/math/igraph/igraph-0.9.5/vendor/f2c/
H A Dlread.c47 #define issign(x) (f__ltab[x+1]&SG) macro
181 if (issign(ch))
189 if (issign(ch)) {
/dports/print/texlive-base/texlive-20150521-source/utils/pmx/pmx-2.7.0/libf2c/
H A Dlread.c45 #define issign(x) (f__ltab[x+1]&SG) macro
182 if (issign(ch))
190 if (issign(ch)) {
/dports/math/geogram/geogram-1.7.7/src/lib/third_party/numerics/LIBF2C/
H A Dlread.c46 #define issign(x) (f__ltab[x+1]&SG) macro
185 if (issign(ch))
193 if (issign(ch)) {
/dports/science/apbs/apbs-pdb2pqr-apbs-1.5-102-g500c1473/apbs/externals/fetk/punc/src/vf2c/
H A Dlread.c45 #define issign(x) (f__ltab[x+1]&SG) macro
184 if (issign(ch))
192 if (issign(ch)) {
/dports/devel/zpu-gcc/zpu-toolchain-1.0/toolchain/gcc/libf2c/libI77/
H A Dlread.c36 #define issign(x) (f__ltab[x+1]&SG) macro
190 if (issign (ch)) in l_R()
199 if (issign (ch)) in l_R()
/dports/math/libflame/libflame-5.2.0/src/map/lapack2flamec/f2c/install/util/io/
H A Dlread.c56 #define issign(x) (f__ltab[x+1]&SG) macro
184 if (issign(ch)) in l_R()
192 if (issign(ch)) { in l_R()
/dports/lang/f2c/f2c-20200916/libf2c/
H A Dlread.c46 #define issign(x) (f__ltab[x+1]&SG) macro
185 if (issign(ch))
193 if (issign(ch)) {
/dports/devel/zpu-binutils/zpu-toolchain-1.0/toolchain/gcc/libf2c/libI77/
H A Dlread.c36 #define issign(x) (f__ltab[x+1]&SG) macro
190 if (issign (ch)) in l_R()
199 if (issign (ch)) in l_R()
/dports/lang/swi-pl/swipl-8.2.3/packages/sgml/
H A Dxsd.c42 #define issign(c) (c == '-' || c == '+') macro
83 if ( issign(*s) ) s++; /* [+-]? */ in xsd_number_string()
103 if ( issign(*s) ) s++; /* [+-]? */ in xsd_number_string()
/dports/lang/ruby26/ruby-2.6.9/
H A Dcomplex.c1590 issign(int c) in issign() function
1601 if (issign(**s)) { in read_sign()
1792 if (issign(**s)) { in read_comp()
H A Drational.c2315 issign(int c) in issign() function
2325 if (*s < e && issign(**s)) { in read_sign()
/dports/math/bcal/bcal-2.2/src/
H A Dbcal.c1605 static int issign(char c) in issign() function
1736 if (exp[i] == '-' && (issign(prev) || prev == '(')) { in fixexpr()
/dports/math/SCIP/scip-7.0.3/src/scip/
H A Dreader_pip.c966 SCIP_Bool issign; in readPolynomial() local
970 issign = FALSE; /* fix compiler warning */ in readPolynomial()
974 … ((nfactors > 0 || havevalue) && (issign = isSign(pipinput, &nextcoefsign))) ) /*lint !e820*/ in readPolynomial()
1013 if( issign ) in readPolynomial()