Searched refs:mxint (Results 1 – 6 of 6) sorted by relevance
| /dports/math/randlib/source/randlib.c/test/ |
| H A D | tstmid.c | 49 static long i,is1,is2,itmp,iwhich,mxint,nperm,nrep,ntot,perm[500],ntry,ncat; in main() local
185 scanf("%ld",&mxint); in main()
186 if (mxint < 1 || mxint > 1000){ in main()
193 ntot = mxint*nrep; in main()
195 itmp = ignuin(K1,mxint); in main()
199 pr_ln_ar(iarray,mxint); in main()
|
| /dports/math/randlib/source/randlib.f/test/ |
| H A D | tstmid.f | 56 INTEGER i,is1,is2,itmp,iwhich,j,mxint,nperm,nrep,ntot,ntry,ncat
224 READ (*,*) mxint
230 ntot = mxint*nrep
232 itmp = ignuin(1,mxint)
236 WRITE (*,'(20I4)') (iarray(j),j=1,mxint)
|
| /dports/math/octave/octave-6.4.0/liboctave/external/ranlib/ |
| H A D | tstmid.for | 56 INTEGER i,is1,is2,itmp,iwhich,j,mxint,nperm,nrep,ntot,ntry,ncat variable
224 READ (*,*) mxint
230 ntot = mxint*nrep
232 itmp = ignuin(1,mxint)
236 WRITE (*,'(20I4)') (iarray(j),j=1,mxint)
|
| /dports/biology/molden/molden5.8/ |
| H A D | molsint.f | 44 parameter (mxint=225)
70 dimension co1(3),co2(3),ca(35),cb(35),s2(mxint,34)
72 dimension shlp(mxint),shlpd(mxint,3)
|
| /dports/math/libpgmath/flang-d07daf3/runtime/flang/ |
| H A D | miscsup_com.c | 46 static MXINT_T mxint(F90_Desc *);
852 mxt = mxint(countd); in ENTFTN()
864 store_mxint_t(count_max, count_maxd, mxint(countd)); in ENTFTN()
866 store_mxint_t(count_max, count_maxd, mxint(count_maxd)); in ENTFTN()
4998 mxint(F90_Desc *bd) function
|
| /dports/math/aribas/aribas-1.64/src/ |
| H A D | arith.c | 783 long mxint = maxdecex - 8; in Fmaxint() local
785 return(mkinum(mxint)); in Fmaxint()
|