Home
last modified time | relevance | path

Searched refs:nup (Results 1 – 25 of 1504) sorted by relevance

12345678910>>...61

/dports/science/cdcl/dcl-5.4.8-C/src/env2/pslib/
H A Dcdclpsnup62 if (NRPAGE[nup] == 0 || NCPAGE[nup] == 0) {
107 if ((rotate[nup] && landscape) || (! rotate[nup] && portrait)) {
108 tmp = NRPAGE[nup]
109 NRPAGE[nup] = NCPAGE[nup]
110 NCPAGE[nup] = tmp
118 xwidth = (urx-llx)*scale[nup]; ywidth = (ury-lly)*scale[nup]
150 if (! rotate[nup]) {
151 aa = a * scale[nup]
152 bb = b * scale[nup]
153 cc = c * scale[nup]
[all …]
/dports/science/dcl/dcl-5.4.8/src/env2/pslib/
H A Ddclpsnup62 if (NRPAGE[nup] == 0 || NCPAGE[nup] == 0) {
107 if ((rotate[nup] && landscape) || (! rotate[nup] && portrait)) {
108 tmp = NRPAGE[nup]
109 NRPAGE[nup] = NCPAGE[nup]
110 NCPAGE[nup] = tmp
118 xwidth = (urx-llx)*scale[nup]; ywidth = (ury-lly)*scale[nup]
150 if (! rotate[nup]) {
151 aa = a * scale[nup]
152 bb = b * scale[nup]
153 cc = c * scale[nup]
[all …]
/dports/science/afni/afni-AFNI_21.3.16/src/
H A Dxdraw.c89 RENUP_VEC(fm3,nup); RENUP_VEC(fm2,nup); in upsample_7short()
90 RENUP_VEC(fm1,nup); RENUP_VEC(f00,nup); in upsample_7short()
91 RENUP_VEC(fp1,nup); RENUP_VEC(fp2,nup); in upsample_7short()
92 RENUP_VEC(fp3,nup); RENUP_VEC(fp4,nup); in upsample_7short()
110 switch( nup ){ in upsample_7short()
118 sout[ii*nup] = INT7(0,ii) ; sout[ii*nup+1] = INT7(1,ii) ; in upsample_7short()
124 sout[ii*nup] = INT7(0,ii) ; sout[ii*nup+1] = INT7(1,ii) ; in upsample_7short()
131 sout[ii*nup] = INT7(0,ii) ; sout[ii*nup+1] = INT7(1,ii) ; in upsample_7short()
220 RENUP_VEC(h00,nup); RENUP_VEC(h01,nup); in upsample_monoshort()
221 RENUP_VEC(h10,nup); RENUP_VEC(h11,nup); in upsample_monoshort()
[all …]
H A Dmri_filt_fft.c41 register int ii , nup ; in mri_filt_fft() local
85 nup = nx ; in mri_filt_fft()
88 nup = ii ; nby2 = nup / 2 ; in mri_filt_fft()
90 GET_AS_BIG(cx,complex,nup) ; GET_AS_BIG(gg,float,nup) ; in mri_filt_fft()
92 dk = (2.0*PI) / (nup * dx) ; in mri_filt_fft()
93 fac = 1.0 / nup ; in mri_filt_fft()
135 nup = ny ; in mri_filt_fft()
138 nup = ii ; nby2 = nup / 2 ; in mri_filt_fft()
140 GET_AS_BIG(cx,complex,nup) ; GET_AS_BIG(gg,float,nup) ; in mri_filt_fft()
142 dk = (2.0*PI) / (nup * dy) ; in mri_filt_fft()
[all …]
H A Dmri_dup.c90 switch(nup){ in mri_dup2D()
124 nx = imin->nx; ny = imin->ny; nxup = nx*nup; nyup = ny*nup ; in mri_dup2D()
126 switch( nup ){ in mri_dup2D()
150 nx = flim->nx ; ny = flim->ny ; nxup = nx*nup ; nyup = ny*nup ; in mri_dup2D()
277 RENUP_VEC(fm3,nup); RENUP_VEC(fm2,nup); in upsample_7()
278 RENUP_VEC(fm1,nup); RENUP_VEC(f00,nup); in upsample_7()
279 RENUP_VEC(fp1,nup); RENUP_VEC(fp2,nup); in upsample_7()
280 RENUP_VEC(fp3,nup); RENUP_VEC(fp4,nup); in upsample_7()
301 switch( nup ){ in upsample_7()
392 switch( nup ){ in upsample_1()
[all …]
H A D3dUpsample.c11 int vstep=0 , ii,nvox , ntin , ntout , do_one=0 , nup=-1 ; in main() local
96 nup = (int)strtod(argv[iarg],NULL) ; in main()
97 if( nup < 2 || nup > 320 ) in main()
135 if (nup == -1) { in main()
139 nup = (int)strtod(argv[iarg++],NULL) ; in main()
140 if( nup < 2 || nup > 320 ) in main()
165 ntout = ntin * nup ; trout = trin / nup ; in main()
191 upsample_1( nup, DSET_NVALS(inset), fac, ofac); in main()
208 outset->taxis->ttdel /= nup ; in main()
209 outset->taxis->ttdur /= nup ; in main()
[all …]
H A Dimupsam.c13 int nup , iarg=1 , do_ascii=0 ; in main() local
47 nup = strtol( argv[iarg++] , NULL , 10 ) ; in main()
48 if( nup < 1 || nup > 30 ){ in main()
57 outim = mri_dup2D( nup , inim ) ; in main()
63 nup = mri_write_ascii( argv[iarg] , outim ) ; in main()
65 nup = mri_write( argv[iarg] , outim ) ; in main()
67 if( nup == 0 ){ in main()
H A D1dUpsample.c8 int iarg=1 , jj , nup , do_one=0 ; in main() local
40 nup = (int)strtod(argv[iarg++],NULL) ; in main()
41 if( nup < 2 || nup > 32 ) in main()
42 ERROR_exit("1dUpsample 'n' parameter = %d is out of range 2..32",nup) ; in main()
57 nxout = nxin * nup ; in main()
63 upsample_1( nup , nxin , inar + nxin*jj , outar + nxout*jj ) ; in main()
65 upsample_7( nup , nxin , inar + nxin*jj , outar + nxout*jj ) ; in main()
H A Dedt_blur.c203 nup = csfft_nextup_one35(nup) ; nby2 = nup / 2 ; in EDIT_blur_volume_3d()
207 if( nup > ncg ){ in EDIT_blur_volume_3d()
209 gg = (float *)realloc(gg,sizeof(float )*nup) ; ncg = nup ; in EDIT_blur_volume_3d()
213 fac = 1.0 / nup ; in EDIT_blur_volume_3d()
340 nup = csfft_nextup_one35(nup) ; nby2 = nup / 2 ; in EDIT_blur_volume_3d()
344 if( nup > ncg ){ in EDIT_blur_volume_3d()
346 gg = (float *)realloc(gg,sizeof(float )*nup) ; ncg = nup ; in EDIT_blur_volume_3d()
350 fac = 1.0 / nup ; in EDIT_blur_volume_3d()
474 nup = csfft_nextup_one35(nup) ; nby2 = nup / 2 ; in EDIT_blur_volume_3d()
478 if( nup > ncg ){ in EDIT_blur_volume_3d()
[all …]
H A Dmri_copy.c40 MRI_IMAGE * mri_expand_2D( int nup , MRI_IMAGE *imin ) /* 22 Feb 2004 */ in mri_expand_2D() argument
50 if( nup < 1 || imin == NULL || imin->nz > 1 ) RETURN(NULL); in mri_expand_2D()
52 if( nup == 1 ){ newim = mri_copy(imin); RETURN(newim); } in mri_expand_2D()
56 nx = imin->nx ; nxup = nx*nup ; in mri_expand_2D()
57 ny = imin->ny ; nyup = ny*nup ; in mri_expand_2D()
64 qq = jj / nup ; in mri_expand_2D()
66 pp = ii / nup ; in mri_expand_2D()
/dports/science/octopus/octopus-10.5/src/math/
H A Dyoung.F9054 integer, intent(in) :: nup, ndown local
61 if (ndown > nup) then
66 this%nup = nup
76 do ipart = ndown+1, nup
132 do iup = this%nup, 1, -1
194 do iup = 1, this%nup
244 integer :: nup, ndown local
251 nup = nparticles - ndown
264 integer :: nup, ndown local
272 nup = nparticles - ndown
[all …]
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwpw/pspw/makepsi/
H A Dwvfnc_init_input.F27 integer up_filling(4,NMAX),nup
58 nup = 0
116 500 if (.not. inp_i(nup))
120 do i=1,nup
184 700 if (.not. inp_i(nup))
187 call getfilling(.true.,nup,up_filling)
203 900 if (.not. inp_i(nup))
206 nup=nup/2
207 call getfilling(.true.,nup,up_filling)
234 > mt_int,1,nup))
[all …]
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwpw/pspw/makepsi/
H A Dwvfnc_init_input.F27 integer up_filling(4,NMAX),nup
58 nup = 0
116 500 if (.not. inp_i(nup))
120 do i=1,nup
184 700 if (.not. inp_i(nup))
187 call getfilling(.true.,nup,up_filling)
203 900 if (.not. inp_i(nup))
206 nup=nup/2
207 call getfilling(.true.,nup,up_filling)
234 > mt_int,1,nup))
[all …]
/dports/biology/molden/molden5.8/
H A Dden3d.f57 nup = 1
70 nup = nup + 1
74 upx(nup) = fxt
75 downx(nup) = fxt
76 upy(nup) = fyt
77 downy(nup) = fyt
86 nup = nup + 1
90 upx(nup) = fxt
91 downx(nup) = fxt
92 upy(nup) = fyt
[all …]
/dports/devel/love/love-11.3/src/libraries/luasocket/libluasocket/
H A Dcompat.c7 void luaL_setfuncs (lua_State *L, const luaL_Reg *l, int nup) { in luaL_setfuncs() argument
8 luaL_checkstack(L, nup+1, "too many upvalues"); in luaL_setfuncs()
12 for (i = 0; i < nup; i++) /* copy upvalues to the top */ in luaL_setfuncs()
13 lua_pushvalue(L, -(nup+1)); in luaL_setfuncs()
14 lua_pushcclosure(L, l->func, nup); /* closure with those upvalues */ in luaL_setfuncs()
15 lua_settable(L, -(nup + 3)); in luaL_setfuncs()
17 lua_pop(L, nup); /* remove upvalues */ in luaL_setfuncs()
/dports/devel/premake5/premake-5.0.0-alpha16-src/binmodules/luasocket/src/
H A Dcompat.c7 void luaL_setfuncs (lua_State *L, const luaL_Reg *l, int nup) { in luaL_setfuncs() argument
8 luaL_checkstack(L, nup+1, "too many upvalues"); in luaL_setfuncs()
12 for (i = 0; i < nup; i++) /* copy upvalues to the top */ in luaL_setfuncs()
13 lua_pushvalue(L, -(nup+1)); in luaL_setfuncs()
14 lua_pushcclosure(L, l->func, nup); /* closure with those upvalues */ in luaL_setfuncs()
15 lua_settable(L, -(nup + 3)); in luaL_setfuncs()
17 lua_pop(L, nup); /* remove upvalues */ in luaL_setfuncs()
/dports/print/a2ps/a2ps-4.13/tests/
H A Dprolog-2.tst16 for nup in 1 4
19 ref_file=$REF_DIR/prolog-${nup}.ps
20 chk_file=$CHK_DIR/prolog-${nup}.ps
22 $verbose "Running a2ps -$nup $OPT $TST_FILE"
23 $CHK -$nup $OPT $TST_FILE >$chk_file 2>&5
25 $verbose "Running ref-a2ps -$nup $OPT $TST_FILE"
26 $REF -$nup $OPT $TST_FILE >$ref_file 2>&5
/dports/emulators/mesen/Mesen-0.9.8-4-g4c701ad6/Lua/
H A Dcompat.c7 void luaL_setfuncs (lua_State *L, const luaL_Reg *l, int nup) { in luaL_setfuncs() argument
8 luaL_checkstack(L, nup+1, "too many upvalues"); in luaL_setfuncs()
12 for (i = 0; i < nup; i++) /* copy upvalues to the top */ in luaL_setfuncs()
13 lua_pushvalue(L, -(nup+1)); in luaL_setfuncs()
14 lua_pushcclosure(L, l->func, nup); /* closure with those upvalues */ in luaL_setfuncs()
15 lua_settable(L, -(nup + 3)); in luaL_setfuncs()
17 lua_pop(L, nup); /* remove upvalues */ in luaL_setfuncs()
/dports/games/wesnoth/wesnoth-1.14.17/src/scripting/
H A Dlua_cpp_function.cpp108 void push_closure( lua_State* L, const lua_function & f, int nup) in push_closure() argument
111 lua_insert(L, -(1+nup)); //move the function beneath the upvalues in push_closure()
112 lua_pushcclosure(L, &intf_closure_dispatcher, 1+nup); in push_closure()
115 void set_functions( lua_State* L, const std::vector<lua_cpp::Reg>& functions, int nup ) in set_functions() argument
118 luaL_checkstack(L, nup+1, "too many upvalues"); in set_functions()
124 for (i = 0; i < nup; ++i) /* copy upvalues to the top */ in set_functions()
125 lua_pushvalue(L, -nup); in set_functions()
126 push_closure(L, l.func, nup); /* closure with those upvalues */ in set_functions()
127 lua_setfield(L, -(nup + 2), l.name); in set_functions()
129 lua_pop(L, nup); /* remove upvalues */ in set_functions()
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/nwpw/pspw/lib/exchange-correlation/
H A Dblyp.f123 real*8 nup,ndn,n,agrup,agrdn,agr local
173 nup = dn_in(j,1) + 0.5d0*ETA2
175 nup_thrd = nup**thrd
183 n = nup + ndn
186 nup2 = nup*nup
204 sdup = 1.0d0/(nup_thrd*nup)
265 xe = (xeup*nup + xedn*ndn)/n
289 nupndn = nup*ndn
294 nup_etthrd = nup**etthrd
295 nup_fvthrd = nup**fvthrd
[all …]
H A Db3lyp.F95 real*8 nup,ndn,n,agrup,agrdn,agr local
150 nup = dn_in(j,1) + 0.5d0*ETA2
158 n = nup + ndn
163 nup2 = nup*nup
168 xi = (nup-ndn)/n
221 chiup = agrup/nup**(4.0d0/3.0d0)
238 call Becke_smalln_correction(nup,nup**thrd,1.0d0,
290 xe = (xeup*nup + xedn*ndn)/n
302 nupndn = nup*ndn
307 nup_etthrd = nup**etthrd
[all …]
/dports/science/nwchem-data/nwchem-7.0.2-release/src/nwpw/pspw/lib/exchange-correlation/
H A Dblyp.f123 real*8 nup,ndn,n,agrup,agrdn,agr
170 nup = dn_in(j,1) + 0.5d0*ETA2
172 nup_thrd = nup**thrd
180 n = nup + ndn
183 nup2 = nup*nup
202 sdup = 1.0d0/(nup_thrd*nup)
255 xe = (xeup*nup + xedn*ndn)/n
279 nupndn = nup*ndn
284 nup_etthrd = nup**etthrd
285 nup_fvthrd = nup**fvthrd
[all …]
H A Db3lyp.F95 real*8 nup,ndn,n,agrup,agrdn,agr
148 nup = dn_in(j,1) + 0.5d0*ETA2
156 n = nup + ndn
161 nup2 = nup*nup
166 xi = (nup-ndn)/n
219 chiup = agrup/nup**(4.0d0/3.0d0)
233 call Becke_smalln_correction(nup,nup**thrd,agrup,
270 xe = (xeup*nup + xedn*ndn)/n
282 nupndn = nup*ndn
287 nup_etthrd = nup**etthrd
[all …]
/dports/print/cups-filters/cups-filters-1.28.10/filter/pdftopdf/
H A Dnup.cc51 bool NupParameters::possible(int nup) // {{{ in possible() argument
54 return (nup>=1)&&(nup<=16)&& in possible()
55 ( (nup!=5)&&(nup!=7)&&(nup!=11)&&(nup!=13)&&(nup!=14) ); in possible()
59 void NupParameters::preset(int nup,NupParameters &ret) // {{{ in preset() argument
61 switch (nup) { in preset()
120 nup(param.nupX*param.nupY), in NupState()
121 subpage(nup) in NupState()
132 subpage=nup; in reset()
208 if (subpage>=nup) { in nextPage()
/dports/science/quantum-espresso/q-e-qe-6.7.0/CPV/src/
H A Dspinsq.f9046 INTEGER :: nup, ndw, ir, i, j, jj, ig, ia, is, iv, jv, inl, jnl local
60 nup = NINT(fup)
61 ndw = nel(1)+nel(2) - nup
65 frac= ABS(fup-nup).GT.1.0d-6
67 DO i=1,nup
70 frac=frac.OR.ABS(fup-nup).GT.1.0d-6
96 ALLOCATE (overlap(nup,ndw))
100 DO i=1,nup
113 DO i=1,nup
136 DO i=1,nup

12345678910>>...61