/dports/science/afni/afni-AFNI_21.3.16/src/ |
H A D | thd_remove_allzero.c | 3 THD_3dim_dataset * THD_remove_allzero( THD_3dim_dataset *iset ) in THD_remove_allzero() argument 11 if( !ISVALID_DSET(iset) ) RETURN(NULL) ; in THD_remove_allzero() 12 DSET_load(iset) ; in THD_remove_allzero() 13 if( !DSET_LOADED(iset) ) RETURN(NULL) ; in THD_remove_allzero() 17 nvals = DSET_NVALS(iset) ; in THD_remove_allzero() 19 if( mri_allzero(DSET_BRICK(iset,iv)) ) nbad++ ; in THD_remove_allzero() 26 oset = EDIT_empty_copy(iset) ; in THD_remove_allzero() 28 ADN_prefix , DSET_PREFIX(iset) , in THD_remove_allzero() 32 if( mri_allzero(DSET_BRICK(iset,iv)) ) continue ; in THD_remove_allzero() 33 bim = mri_copy(DSET_BRICK(iset,iv)) ; in THD_remove_allzero() [all …]
|
H A D | 3dPval.c | 5 THD_3dim_dataset *iset , *oset ; in main() local 100 iset = THD_open_dataset( argv[iarg] ) ; CHECK_OPEN_ERROR(iset,argv[iarg]) ; in main() 101 DSET_load(iset) ; ; CHECK_LOAD_ERROR(iset) ; in main() 103 oset = EDIT_empty_copy(iset) ; in main() 112 for( kk=0 ; kk < DSET_NVALS(iset) ; kk++ ){ in main() 113 iim = THD_extract_float_brick(kk,iset) ; in main() 116 DSET_unload_one(iset,kk) ; in main() 119 oim = mri_to_zscore( iim , DSET_BRICK_STATCODE(iset,kk) , in main() 122 floatvec *fv = DSET_BRICK_FDRCURVE(iset,kk) ; in main() 130 oim = mri_to_pval( iim , DSET_BRICK_STATCODE(iset,kk) , in main() [all …]
|
H A D | 3dTsplit4D.c | 56 THD_3dim_dataset *iset, *oset; in main() local 96 iset = THD_open_dataset( argv[iarg] ); in main() 97 CHECK_OPEN_ERROR( iset, argv[iarg] ); in main() 99 DSET_load(iset); in main() 100 CHECK_LOAD_ERROR(iset); in main() 104 nval=DSET_NVALS(iset); in main() 133 oset = EDIT_empty_copy( iset ); //Easy to just copy! in main() 155 if( keep_datum ) datum = DSET_BRICK_TYPE(iset, kk); in main() 164 if( DSET_HAS_LABEL(iset, kk) ) { in main() 180 inImage = THD_extract_float_brick(kk, iset); in main() [all …]
|
/dports/science/afni/afni-AFNI_21.3.16/src/scripts_install/ |
H A D | @djunct_anonymize | 16 set iset = "" 44 set iset = "$argv[$ac]" 75 if ( "$iset" == "" ) then 99 set iset = "${cp_prefix}" 106 set iset = "${cp_prefix}" 109 set iset = "${cp_prefix}" 134 ${iset} 136 if ( `3dinfo -is_nifti ${iset}` ) then 141 -infiles ${iset} 148 ${iset} [all …]
|
/dports/science/yoda/YODA-1.9.1/tests/ |
H A D | TestIndexedSet.cc | 10 Utils::indexedset<int> iset; in main() local 11 iset.insert(1); in main() 12 iset.insert(5); in main() 13 iset.insert(3); in main() 14 iset.insert(2); in main() 15 iset.insert(4); in main() 21 cout << "iset[3]: " << iset[3] << " == 4: " in main() 22 << boolalpha << (iset[3] == 4) in main() 25 return (iset[3] == 4) ? EXIT_SUCCESS : EXIT_FAILURE; in main()
|
/dports/science/cp2k/cp2k-2e995eec7fd208c8a72d9544807bd8b8ba8cd1cc/src/ |
H A D | lri_environment_init.F | 434 DO iset = 1, basis%nset 436 l = basis%l(ishell, iset) 440 DO isgf = basis%first_sgf(ishell, iset), basis%last_sgf(ishell, iset) 480 DO iset = 1, basis%nset 482 l = basis%l(ishell, iset) 485 DO isgf = basis%first_sgf(ishell, iset), basis%last_sgf(ishell, iset) 523 DO iset = 1, basis%nset 525 l = basis%l(ishell, iset) 527 DO isgf = basis%first_sgf(ishell, iset), basis%last_sgf(ishell, iset) 566 DO iset = 1, basis%nset [all …]
|
H A D | pao_linpot_rotinv.F | 72 DO iset = 1, basis_set%nset 171 DO iset = 1, basis_set%nset 172 DO jset = 1, iset 262 DO iset = 1, basis_set%nset 263 DO jset = 1, iset 292 DO iset = 1, basis_set%nset 293 DO jset = 1, iset 378 DO iset = 1, basis_set%nset 379 DO jset = 1, iset 409 DO iset = 1, basis_set%nset [all …]
|
H A D | auto_basis.F | 476 iset = 0 525 iset = iset + 1 531 iset = iset + 1 537 iset = iset + 1 544 iset = iset + 1 550 iset = iset + 1 558 iset = iset + 1 616 DO iset = 1, nset 635 zeta = zet(i, iset) + zet(j, iset) 860 zval(j1:j2) = zet(1:npgf(iset), iset) [all …]
|
H A D | core_ppl.F | 317 ncoa = npgfa(iset)*ncoset(la_max(iset)) 404 ncoa = npgfa(iset)*ncoset(la_max(iset)) 415 la_max(iset), la_min(iset), npgfa(iset), & 416 rpgfa(:, iset), zeta(:, iset), & 421 hab(:, :, iset, jset), ppl_work, pab(:, :, iset, jset), & 448 la_max(iset), la_min(iset), npgfa(iset), & 449 rpgfa(:, iset), zeta(:, iset), & 462 ncoa = npgfa(iset)*ncoset(la_max(iset)) 743 la_max(iset), la_min(iset), npgfa(iset), rpgfa(:, iset), zeta(:, iset), & 749 la_max(iset), la_min(iset), npgfa(iset), rpgfa(:, iset), zeta(:, iset), & [all …]
|
H A D | optimize_basis_types.F | 193 DO iset = 1, SIZE(kind%flex_basis(ibasis)%subset) 194 IF (ALLOCATED(kind%flex_basis(ibasis)%subset(iset)%l)) & 195 DEALLOCATE (kind%flex_basis(ibasis)%subset(iset)%l) 196 IF (ALLOCATED(kind%flex_basis(ibasis)%subset(iset)%coeff)) & 197 DEALLOCATE (kind%flex_basis(ibasis)%subset(iset)%coeff) 199 DEALLOCATE (kind%flex_basis(ibasis)%subset(iset)%opt_coeff) 202 IF (ALLOCATED(kind%flex_basis(ibasis)%subset(iset)%exps)) & 203 DEALLOCATE (kind%flex_basis(ibasis)%subset(iset)%exps) 205 DEALLOCATE (kind%flex_basis(ibasis)%subset(iset)%opt_exps) 207 DEALLOCATE (kind%flex_basis(ibasis)%subset(iset)%exp_x_ind) [all …]
|
H A D | optimize_basis_utils.F | 92 DO iset = 1, opt_bas%ntraining_sets 408 DO iset = 1, basis%nsets 498 DO iset = 1, basis%nsets 499 …ITE (UNIT=unit_nr, FMT="(30(1X,I0))") basis%subset(iset)%n, basis%subset(iset)%lmin, basis%subset(… 500 basis%subset(iset)%nexp, basis%subset(iset)%l 503 basis%subset(iset)%exps(iexp), basis%subset(iset)%coeff(iexp, :) 728 iset = jset + 1 746 deriv_info(iset)%nsets = n_rep 874 flex_basis%subset(iset)%exp_const(ipgf)%init = flex_basis%subset(iset)%exps(ipgf) 897 DO iset = 1, basis%nsets [all …]
|
/dports/science/cp2k-data/cp2k-7.1.0/src/ |
H A D | lri_environment_init.F | 434 DO iset = 1, basis%nset 436 l = basis%l(ishell, iset) 440 DO isgf = basis%first_sgf(ishell, iset), basis%last_sgf(ishell, iset) 480 DO iset = 1, basis%nset 482 l = basis%l(ishell, iset) 485 DO isgf = basis%first_sgf(ishell, iset), basis%last_sgf(ishell, iset) 523 DO iset = 1, basis%nset 525 l = basis%l(ishell, iset) 527 DO isgf = basis%first_sgf(ishell, iset), basis%last_sgf(ishell, iset) 566 DO iset = 1, basis%nset [all …]
|
H A D | pao_linpot_rotinv.F | 72 DO iset = 1, basis_set%nset 171 DO iset = 1, basis_set%nset 172 DO jset = 1, iset 262 DO iset = 1, basis_set%nset 263 DO jset = 1, iset 292 DO iset = 1, basis_set%nset 293 DO jset = 1, iset 378 DO iset = 1, basis_set%nset 379 DO jset = 1, iset 409 DO iset = 1, basis_set%nset [all …]
|
H A D | auto_basis.F | 462 iset = 0 511 iset = iset + 1 517 iset = iset + 1 523 iset = iset + 1 530 iset = iset + 1 536 iset = iset + 1 544 iset = iset + 1 602 DO iset = 1, nset 621 zeta = zet(i, iset) + zet(j, iset) 846 zval(j1:j2) = zet(1:npgf(iset), iset) [all …]
|
H A D | optimize_basis_types.F | 193 DO iset = 1, SIZE(kind%flex_basis(ibasis)%subset) 194 IF (ALLOCATED(kind%flex_basis(ibasis)%subset(iset)%l)) & 195 DEALLOCATE (kind%flex_basis(ibasis)%subset(iset)%l) 196 IF (ALLOCATED(kind%flex_basis(ibasis)%subset(iset)%coeff)) & 197 DEALLOCATE (kind%flex_basis(ibasis)%subset(iset)%coeff) 199 DEALLOCATE (kind%flex_basis(ibasis)%subset(iset)%opt_coeff) 202 IF (ALLOCATED(kind%flex_basis(ibasis)%subset(iset)%exps)) & 203 DEALLOCATE (kind%flex_basis(ibasis)%subset(iset)%exps) 205 DEALLOCATE (kind%flex_basis(ibasis)%subset(iset)%opt_exps) 207 DEALLOCATE (kind%flex_basis(ibasis)%subset(iset)%exp_x_ind) [all …]
|
/dports/devel/llvm-devel/llvm-project-f05c95f10fc1d8171071735af8ad3a9e87633120/openmp/runtime/test/api/ |
H A D | omp_nteams_api_env2.c | 9 int iset, iget; in main() local 10 iset = 4; // should override OMP_NUM_TEAMS=5 in main() 11 omp_set_num_teams(iset); in main() 13 if (iset != iget) { in main() 14 fprintf(stderr, "error: nteams-var set to %d, getter returned %d\n", iset, iget); in main() 17 iset = 6; // should override OMP_TEAMS_THREAD_LIMIT=7 in main() 18 omp_set_teams_thread_limit(iset); in main() 20 if (iset != iget) { in main() 21 fprintf(stderr, "error: teams-thread-limit-var set to %d, getter returned %d\n", iset, iget); in main()
|
H A D | omp_nteams_api.c | 9 int iset, iget; in main() local 10 iset = 5; in main() 11 omp_set_num_teams(iset); in main() 13 if (iset != iget) { in main() 14 fprintf(stderr, "error: nteams-var set to %d, getter returned %d\n", iset, iget); in main() 17 iset = 7; in main() 18 omp_set_teams_thread_limit(iset); in main() 20 if (iset != iget) { in main() 21 fprintf(stderr, "error: teams-thread-limit-var set to %d, getter returned %d\n", iset, iget); in main()
|
/dports/devel/wasi-compiler-rt13/llvm-project-13.0.1.src/openmp/runtime/test/api/ |
H A D | omp_nteams_api.c | 9 int iset, iget; in main() local 10 iset = 5; in main() 11 omp_set_num_teams(iset); in main() 13 if (iset != iget) { in main() 14 fprintf(stderr, "error: nteams-var set to %d, getter returned %d\n", iset, iget); in main() 17 iset = 7; in main() 18 omp_set_teams_thread_limit(iset); in main() 20 if (iset != iget) { in main() 21 fprintf(stderr, "error: teams-thread-limit-var set to %d, getter returned %d\n", iset, iget); in main()
|
H A D | omp_nteams_api_env2.c | 9 int iset, iget; in main() local 10 iset = 4; // should override OMP_NUM_TEAMS=5 in main() 11 omp_set_num_teams(iset); in main() 13 if (iset != iget) { in main() 14 fprintf(stderr, "error: nteams-var set to %d, getter returned %d\n", iset, iget); in main() 17 iset = 6; // should override OMP_TEAMS_THREAD_LIMIT=7 in main() 18 omp_set_teams_thread_limit(iset); in main() 20 if (iset != iget) { in main() 21 fprintf(stderr, "error: teams-thread-limit-var set to %d, getter returned %d\n", iset, iget); in main()
|
/dports/devel/wasi-libcxx/llvm-project-13.0.1.src/openmp/runtime/test/api/ |
H A D | omp_nteams_api.c | 9 int iset, iget; in main() local 10 iset = 5; in main() 11 omp_set_num_teams(iset); in main() 13 if (iset != iget) { in main() 14 fprintf(stderr, "error: nteams-var set to %d, getter returned %d\n", iset, iget); in main() 17 iset = 7; in main() 18 omp_set_teams_thread_limit(iset); in main() 20 if (iset != iget) { in main() 21 fprintf(stderr, "error: teams-thread-limit-var set to %d, getter returned %d\n", iset, iget); in main()
|
H A D | omp_nteams_api_env2.c | 9 int iset, iget; in main() local 10 iset = 4; // should override OMP_NUM_TEAMS=5 in main() 11 omp_set_num_teams(iset); in main() 13 if (iset != iget) { in main() 14 fprintf(stderr, "error: nteams-var set to %d, getter returned %d\n", iset, iget); in main() 17 iset = 6; // should override OMP_TEAMS_THREAD_LIMIT=7 in main() 18 omp_set_teams_thread_limit(iset); in main() 20 if (iset != iget) { in main() 21 fprintf(stderr, "error: teams-thread-limit-var set to %d, getter returned %d\n", iset, iget); in main()
|
/dports/devel/llvm13/llvm-project-13.0.1.src/openmp/runtime/test/api/ |
H A D | omp_nteams_api_env2.c | 9 int iset, iget; in main() local 10 iset = 4; // should override OMP_NUM_TEAMS=5 in main() 11 omp_set_num_teams(iset); in main() 13 if (iset != iget) { in main() 14 fprintf(stderr, "error: nteams-var set to %d, getter returned %d\n", iset, iget); in main() 17 iset = 6; // should override OMP_TEAMS_THREAD_LIMIT=7 in main() 18 omp_set_teams_thread_limit(iset); in main() 20 if (iset != iget) { in main() 21 fprintf(stderr, "error: teams-thread-limit-var set to %d, getter returned %d\n", iset, iget); in main()
|
H A D | omp_nteams_api.c | 9 int iset, iget; in main() local 10 iset = 5; in main() 11 omp_set_num_teams(iset); in main() 13 if (iset != iget) { in main() 14 fprintf(stderr, "error: nteams-var set to %d, getter returned %d\n", iset, iget); in main() 17 iset = 7; in main() 18 omp_set_teams_thread_limit(iset); in main() 20 if (iset != iget) { in main() 21 fprintf(stderr, "error: teams-thread-limit-var set to %d, getter returned %d\n", iset, iget); in main()
|
/dports/cad/calculix-ccx/CalculiX/ccx_2.18/src/ |
H A D | frdset.c | 24 void frdset(char *filabl,char *set,ITG *iset,ITG *istartset,ITG *iendset, in frdset() argument 35 for((*iset)=0;(*iset)<(*nset);(*iset)++){ in frdset() 36 if(strcmp2(&set[81**iset],noset,81)==0) break; in frdset() 38 (*iset)++; in frdset() 39 if(*iset>*nset)*iset=0; in frdset() 44 if(*iset==0){ in frdset() 63 for(j=istartset[*iset-1]-1;j<iendset[*iset-1];j++){ in frdset()
|
/dports/lang/chibi-scheme/chibi-scheme-0.10/lib/chibi/iset/ |
H A D | optimize.sld | 2 (define-library (chibi iset optimize) 6 (import (chibi iset base) 7 (chibi iset iterators) 8 (chibi iset constructors)) 20 iset-balance iset-balance! iset-optimize iset-optimize! 21 iset->code iset->code/lambda))
|