| /dports/math/reduce/Reduce-svn5758-src/psl/dist/nonkernel/win32/ |
| H A D | write-fl.sl.boxed | 90 (prog(i exp digit decpos ndig one ten bufferptr int flag)
142 (setq decpos 0))
144 (setq decpos (iadd1 exp)
149 decpos 1)
155 (when (and (wgreaterp decpos 0)
156 (eq (setq decpos (isub1 decpos)) 0))
164 (when (wgreaterp decpos 0)
165 (while (wgreaterp (setq decpos (isub1 decpos)) 0)
|
| /dports/sysutils/tarsnap/tarsnap-autoconf-1.0.39/lib/keyfile/ |
| H A D | keyfile.c | 270 size_t decpos; in read_base64() local
290 decpos = 0; in read_base64()
309 if (b64decode(keybuf, llen, &decbuf[decpos], &len)) in read_base64()
318 &decbuf[decpos], len - 6, hbuf)) { in read_base64()
325 if (memcmp(hbuf, &decbuf[decpos + len - 6], 6)) in read_base64()
329 decpos += len - 6; in read_base64()
348 if (read_base256(decbuf, decpos, machinenum, filename, keys, force)) in read_base64()
|
| /dports/science/healpix/Healpix_3.50/src/idl/zzz_external/astron/ |
| H A D | ftinfo.pro | 104 decpos = strpos(tform,'.')
105 decimal = decpos GT 0
109 if decimal[i] then width[i] = fix(strmid(tform[i],1,decpos[i]-1)) else $
|
| /dports/math/aribas/aribas-1.64/src/ |
| H A D | print.c | 442 int k, len, digs, digsmax, decpos, sign, flg; in Secvt() local
470 decpos = (len ? len + acc.expo : 0); in Secvt()
1041 long decpos, expo; local
1065 decpos = (len ? len + acc.expo : 0);
1066 if(decpos <= grp && decpos > -grp) {
1071 expo = decpos - 1;
1072 decpos = 1;
1081 if(decpos <= 0) {
1083 for(k=0; k>=decpos+1; k--)
1085 for(k=decpos; (k>-grp) && (--digs>=0); k--)
[all …]
|
| H A D | aribas.hlp | 1181 float_ecvt(x: real; ndig: integer; var decpos, sign: integer): string;
1185 variable paramenter decpos (decpos < 0 means that the decimal point is
1191 ==> float_ecvt(pi,10,decpos,sign).
1194 ==> decpos.
|
| /dports/science/jstrack/jstrack/extlib/tcllib1.19/tool-ui/ |
| H A D | tool-ui.tcl | 1830 set decpos [expr {[string length $i] -1}]
1858 set rstring "[string range $tstring 0 $n-1][pad0 $decpos $n]"
1861 set rstring "[string range $tstring 0 $n-2]$x[pad0 $decpos $n]"
1865 set rstring "[string range $tstring 0 $n-1][pad0 $decpos $n]"
1870 set rstring "[string range $tstring 0 $n-2]$x[pad0 $decpos $n]"
1884 set result "$s[string range $rstring 0 $decpos]$decimalPoint$decfrac"
1888 …set result "$s[string range $rstring 0 $decpos]$decimalPoint[string range $rstring $decpos+1 end]$…
1899 proc ::siground::pad0 {decpos n} {
1902 incr decpos
1903 set x [expr {$decpos - $n}]
|
| /dports/mail/mlmmj/mlmmj-1.3.0/contrib/foot_filter/ |
| H A D | foot_filter.c | 2492 int decpos=buffer_read; in decode_lookahead() local
2501 resort_to_exit(decpos-decoded.r<buffer_read, in decode_lookahead()
2503 decpos-=decoded.r; in decode_lookahead()
2509 ++decpos; ++cc; in decode_lookahead()
2513 ++decpos; ++cc; in decode_lookahead()
2517 ++decpos; ++cc; in decode_lookahead()
2525 buffer_filled+=decpos-pos; in decode_lookahead()
2526 mem_buffer_filled+=decpos-pos; in decode_lookahead()
2527 mem_buffer_next_fill+=decpos-pos; in decode_lookahead()
|
| /dports/astro/p5-Starlink-AST/Starlink-AST-1.05/ast/ |
| H A D | skyaxis.c | 3257 int decpos; /* Offset of decimal point */ in ParseDHmsFormat() local
3273 decpos = -1; in ParseDHmsFormat()
3333 decpos = i; in ParseDHmsFormat()
3357 if ( ( decpos >= 0 ) && ( decpos < ( i - 1 ) ) ) { in ParseDHmsFormat()
3359 if ( astSscanf( fmt + decpos + 1, "%d", &ndpval ) == 1 ) { in ParseDHmsFormat()
3362 } else if ( fmt[ decpos + 1 ] == '*' ) { in ParseDHmsFormat()
|
| /dports/devel/efl/efl-1.25.1/src/lib/ecore/ |
| H A D | ecore_anim.c | 615 double len, decay, decpos, p2; in _pos_map_spring() local
624 decpos = (double)b1 / (double)b2; in _pos_map_spring()
625 decay = _pos_map_accel_factor(1.0 - decpos, decfac); in _pos_map_spring()
|
| /dports/shells/zsh/zsh-5.8.1/Src/Zle/ |
| H A D | zle.h | 103 #define DECPOS(pos) decpos(&pos)
|
| H A D | zle_move.c | 152 decpos(int *pos) in decpos() function
|
| /dports/security/putty-nogtk/putty-0.76/ |
| H A D | terminal.h | 527 #define decpos(p) decpos_fn(&(p), GET_TERM_COLS) macro
|
| H A D | terminal.c | 6310 decpos(nlpos); in clipme()
6322 decpos(nlpos); in clipme()
6749 decpos(term->selend); in sel_spread()
7087 decpos(term->selanchor); in term_mouse()
|
| /dports/security/putty/putty-0.76/ |
| H A D | terminal.h | 527 #define decpos(p) decpos_fn(&(p), GET_TERM_COLS) macro
|
| H A D | terminal.c | 6310 decpos(nlpos); in clipme()
6322 decpos(nlpos); in clipme()
6749 decpos(term->selend); in sel_spread()
7087 decpos(term->selanchor); in term_mouse()
|
| /dports/ftp/filezilla/filezilla-3.55.1/src/putty/ |
| H A D | terminal.h | 527 #define decpos(p) decpos_fn(&(p), GET_TERM_COLS) macro
|
| /dports/news/golded+/golded-plus/golded+/goldlib/gcui/ |
| H A D | gwinall.h | 184 int decpos; // decimal position (numeric) member
|
| /dports/misc/ipbt/ipbt-r8765/ |
| H A D | terminal.c | 20 #define decpos(p) ( (p).x == 0 ? ((p).x = term->cols, (p).y--, 1) : ((p).x--, 0) ) macro
5121 decpos(nlpos); in clipme()
5126 decpos(nlpos); in clipme()
5473 decpos(term->selend); in sel_spread()
5673 decpos(term->selanchor); in term_mouse()
|
| /dports/math/aribas/aribas-1.64/doc/ |
| H A D | aribas.doc | 2584 float_ecvt(x: real; ndig: integer; var decpos, sign: integer): string;
2588 in the variable paramenter decpos (decpos < 0 means that the decimal
2596 ==> float_ecvt(pi,10,decpos,sign).
2599 ==> decpos.
|