/dports/french/med/med-4.0.0/tools/medimport/2.1.x/ |
H A D | MED21datasetNumLire.c | 129 pflsize [0] = psize*ngauss*nbdim; in _MED21datasetNumLire() 130 pcount [0] = psize*ngauss*dimutil; in _MED21datasetNumLire() 145 for (j=0; j < ngauss; j++) { in _MED21datasetNumLire() 146 index = i*ngauss+j + (dim-firstdim)*(psize*ngauss); in _MED21datasetNumLire() 173 index = i*ngauss+j + (dim-firstdim)*(psize*ngauss); in _MED21datasetNumLire() 236 pflsize [0] = psize*ngauss*nbdim; in _MED21datasetNumLire() 247 for (j=0; j < ngauss; j++) { in _MED21datasetNumLire() 248 index = i*ngauss+j + (dim-firstdim)*(psize*ngauss); in _MED21datasetNumLire() 277 for (j=0; j < ngauss; j++) { in _MED21datasetNumLire() 278 index = i*ngauss+j + (dim-firstdim)*(psize*ngauss); in _MED21datasetNumLire() [all …]
|
/dports/french/med/med-4.0.0/src/2.3.6/hdfi/ |
H A D | MEDdatasetNumLire232.c | 65 med_int ngauss,nbelem; in _MEDdatasetNumLire232() local 92 ngauss = va_arg(params,med_int); in _MEDdatasetNumLire232() 206 pflsize [0] = psize*ngauss*nbdim; in _MEDdatasetNumLire232() 207 pcount [0] = psize*ngauss*dimutil; in _MEDdatasetNumLire232() 227 for (j=0; j < ngauss; j++) { in _MEDdatasetNumLire232() 228 index = i*ngauss+j + (dim-firstdim)*(psize*ngauss); in _MEDdatasetNumLire232() 259 for (j=0; j < ngauss; j++) { in _MEDdatasetNumLire232() 260 index = i*ngauss+j + (dim-firstdim)*(psize*ngauss); in _MEDdatasetNumLire232() 349 for (j=0; j < ngauss; j++) { in _MEDdatasetNumLire232() 350 index = i*ngauss+j + (dim-firstdim)*(psize*ngauss); in _MEDdatasetNumLire232() [all …]
|
H A D | MEDdatasetNumEcrire231.c | 56 med_int ngauss; in _MEDdatasetNumEcrire231() local 81 ngauss = va_arg(params,med_int); in _MEDdatasetNumEcrire231() 182 pflsize [0] = psize*ngauss*nbdim; in _MEDdatasetNumEcrire231() 183 pcount [0] = psize*ngauss*dimutil; in _MEDdatasetNumEcrire231() 198 for (j=0; j < ngauss; j++) { in _MEDdatasetNumEcrire231() 199 index = i*ngauss+j + (dim-firstdim)*(psize*ngauss); in _MEDdatasetNumEcrire231() 226 index = i*ngauss+j + (dim-firstdim)*(psize*ngauss); in _MEDdatasetNumEcrire231() 290 pflsize [0] = psize*ngauss*nbdim; in _MEDdatasetNumEcrire231() 301 for (j=0; j < ngauss; j++) { in _MEDdatasetNumEcrire231() 302 index = i*ngauss+j + (dim-firstdim)*(psize*ngauss); in _MEDdatasetNumEcrire231() [all …]
|
H A D | MEDdatasetNumLire231.c | 54 med_int ngauss,nbelem; in _MEDdatasetNumLire231() local 80 ngauss = va_arg(params,med_int); in _MEDdatasetNumLire231() 169 pflsize [0] = psize*ngauss*nbdim; in _MEDdatasetNumLire231() 170 pcount [0] = psize*ngauss*dimutil; in _MEDdatasetNumLire231() 184 for (j=0; j < ngauss; j++) { in _MEDdatasetNumLire231() 185 index = i*ngauss+j + (dim-firstdim)*(psize*ngauss); in _MEDdatasetNumLire231() 211 for (j=0; j < ngauss; j++) { in _MEDdatasetNumLire231() 212 index = i*ngauss+j + (dim-firstdim)*(psize*ngauss); in _MEDdatasetNumLire231() 287 for (j=0; j < ngauss; j++) { in _MEDdatasetNumLire231() 288 index = i*ngauss+j + (dim-firstdim)*(psize*ngauss); in _MEDdatasetNumLire231() [all …]
|
H A D | MEDdatasetNumEcrire232.c | 66 med_int ngauss,modifpfl; in _MEDdatasetNumEcrire232() local 92 ngauss = va_arg(params,med_int); in _MEDdatasetNumEcrire232() 130 datasetsize[0] = psize*ngauss*nbdim; in _MEDdatasetNumEcrire232() 257 pflsize [0] = psize*ngauss*nbdim; in _MEDdatasetNumEcrire232() 277 for (j=0; j < ngauss; j++) { in _MEDdatasetNumEcrire232() 278 index = i*ngauss+j + (dim-firstdim)*(psize*ngauss); in _MEDdatasetNumEcrire232() 318 for (j=0; j < ngauss; j++) { in _MEDdatasetNumEcrire232() 319 index = i*ngauss+j + (dim-firstdim)*(psize*ngauss); in _MEDdatasetNumEcrire232() 435 for (j=0; j < ngauss; j++) { in _MEDdatasetNumEcrire232() 436 index = i*ngauss+j + (dim-firstdim)*(psize*ngauss); in _MEDdatasetNumEcrire232() [all …]
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/PHonon/examples/Recover_example/reference_1/elph_dir/ |
H A D | elph.inp_lambda.1 | 3 Gaussian Broadening: 0.005 Ry, ngauss= 0 8 Gaussian Broadening: 0.010 Ry, ngauss= 0 13 Gaussian Broadening: 0.015 Ry, ngauss= 0 18 Gaussian Broadening: 0.020 Ry, ngauss= 0 23 Gaussian Broadening: 0.025 Ry, ngauss= 0 28 Gaussian Broadening: 0.030 Ry, ngauss= 0 33 Gaussian Broadening: 0.035 Ry, ngauss= 0 38 Gaussian Broadening: 0.040 Ry, ngauss= 0 43 Gaussian Broadening: 0.045 Ry, ngauss= 0 48 Gaussian Broadening: 0.050 Ry, ngauss= 0
|
H A D | elph.inp_lambda.3 | 3 Gaussian Broadening: 0.005 Ry, ngauss= 0 8 Gaussian Broadening: 0.010 Ry, ngauss= 0 13 Gaussian Broadening: 0.015 Ry, ngauss= 0 18 Gaussian Broadening: 0.020 Ry, ngauss= 0 23 Gaussian Broadening: 0.025 Ry, ngauss= 0 28 Gaussian Broadening: 0.030 Ry, ngauss= 0 33 Gaussian Broadening: 0.035 Ry, ngauss= 0 38 Gaussian Broadening: 0.040 Ry, ngauss= 0 43 Gaussian Broadening: 0.045 Ry, ngauss= 0 48 Gaussian Broadening: 0.050 Ry, ngauss= 0
|
H A D | elph.inp_lambda.5 | 3 Gaussian Broadening: 0.005 Ry, ngauss= 0 8 Gaussian Broadening: 0.010 Ry, ngauss= 0 13 Gaussian Broadening: 0.015 Ry, ngauss= 0 18 Gaussian Broadening: 0.020 Ry, ngauss= 0 23 Gaussian Broadening: 0.025 Ry, ngauss= 0 28 Gaussian Broadening: 0.030 Ry, ngauss= 0 33 Gaussian Broadening: 0.035 Ry, ngauss= 0 38 Gaussian Broadening: 0.040 Ry, ngauss= 0 43 Gaussian Broadening: 0.045 Ry, ngauss= 0 48 Gaussian Broadening: 0.050 Ry, ngauss= 0
|
H A D | elph.inp_lambda.2 | 3 Gaussian Broadening: 0.005 Ry, ngauss= 0 8 Gaussian Broadening: 0.010 Ry, ngauss= 0 13 Gaussian Broadening: 0.015 Ry, ngauss= 0 18 Gaussian Broadening: 0.020 Ry, ngauss= 0 23 Gaussian Broadening: 0.025 Ry, ngauss= 0 28 Gaussian Broadening: 0.030 Ry, ngauss= 0 33 Gaussian Broadening: 0.035 Ry, ngauss= 0 38 Gaussian Broadening: 0.040 Ry, ngauss= 0 43 Gaussian Broadening: 0.045 Ry, ngauss= 0 48 Gaussian Broadening: 0.050 Ry, ngauss= 0
|
H A D | elph.inp_lambda.4 | 3 Gaussian Broadening: 0.005 Ry, ngauss= 0 8 Gaussian Broadening: 0.010 Ry, ngauss= 0 13 Gaussian Broadening: 0.015 Ry, ngauss= 0 18 Gaussian Broadening: 0.020 Ry, ngauss= 0 23 Gaussian Broadening: 0.025 Ry, ngauss= 0 28 Gaussian Broadening: 0.030 Ry, ngauss= 0 33 Gaussian Broadening: 0.035 Ry, ngauss= 0 38 Gaussian Broadening: 0.040 Ry, ngauss= 0 43 Gaussian Broadening: 0.045 Ry, ngauss= 0 48 Gaussian Broadening: 0.050 Ry, ngauss= 0
|
H A D | elph.inp_lambda.6 | 3 Gaussian Broadening: 0.005 Ry, ngauss= 0 8 Gaussian Broadening: 0.010 Ry, ngauss= 0 13 Gaussian Broadening: 0.015 Ry, ngauss= 0 18 Gaussian Broadening: 0.020 Ry, ngauss= 0 23 Gaussian Broadening: 0.025 Ry, ngauss= 0 28 Gaussian Broadening: 0.030 Ry, ngauss= 0 33 Gaussian Broadening: 0.035 Ry, ngauss= 0 38 Gaussian Broadening: 0.040 Ry, ngauss= 0 43 Gaussian Broadening: 0.045 Ry, ngauss= 0 48 Gaussian Broadening: 0.050 Ry, ngauss= 0
|
H A D | elph.inp_lambda.7 | 3 Gaussian Broadening: 0.005 Ry, ngauss= 0 8 Gaussian Broadening: 0.010 Ry, ngauss= 0 13 Gaussian Broadening: 0.015 Ry, ngauss= 0 18 Gaussian Broadening: 0.020 Ry, ngauss= 0 23 Gaussian Broadening: 0.025 Ry, ngauss= 0 28 Gaussian Broadening: 0.030 Ry, ngauss= 0 33 Gaussian Broadening: 0.035 Ry, ngauss= 0 38 Gaussian Broadening: 0.040 Ry, ngauss= 0 43 Gaussian Broadening: 0.045 Ry, ngauss= 0 48 Gaussian Broadening: 0.050 Ry, ngauss= 0
|
H A D | elph.inp_lambda.8 | 3 Gaussian Broadening: 0.005 Ry, ngauss= 0 8 Gaussian Broadening: 0.010 Ry, ngauss= 0 13 Gaussian Broadening: 0.015 Ry, ngauss= 0 18 Gaussian Broadening: 0.020 Ry, ngauss= 0 23 Gaussian Broadening: 0.025 Ry, ngauss= 0 28 Gaussian Broadening: 0.030 Ry, ngauss= 0 33 Gaussian Broadening: 0.035 Ry, ngauss= 0 38 Gaussian Broadening: 0.040 Ry, ngauss= 0 43 Gaussian Broadening: 0.045 Ry, ngauss= 0 48 Gaussian Broadening: 0.050 Ry, ngauss= 0
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/PW/src/ |
H A D | set_occupations.f90 | 10 lfixed, ltetra, tetra_type, lgauss, ngauss ) argument 24 INTEGER, INTENT(OUT) :: tetra_type, ngauss local 30 ngauss = 0 50 ngauss = 0 53 ngauss = 1 56 ngauss = -1 59 ngauss = -99
|
H A D | gweights.f90 | 27 INTEGER, INTENT(IN) :: ngauss local 52 ef = efermig( et, nbnd, nks, nelec, wk, degauss, ngauss, is, isk ) 57 ngauss, et, ef, demet, wg ) 65 ngauss, et, ef, demet, wg ) argument 81 INTEGER, INTENT(IN) :: ngauss local 118 wgauss( (ef-et(ibnd,kpoint))/degauss, ngauss ) 129 degauss * w1gauss( (ef-et(ibnd,kpoint))/degauss, ngauss )
|
/dports/french/med/med-4.0.0/src/2.3.6/fi/ |
H A D | gauss.f | 41 subroutine efgaui( fid , indice , locname, typgeo, ngauss , cret) argument 48 integer indice,typgeo,ngauss,cret 54 cret = edfgaui (fid,indice,locname,typgeo,ngauss) 61 subroutine efgaue( fid, typgeo, refcoo, mode_coo, ngauss, argument 69 integer typgeo,mode_coo,ngauss,cret 74 cret = edfgaue( fid, typgeo, refcoo, mode_coo, ngauss,
|
/dports/french/med/med-4.0.0/tests/python/ |
H A D | test11.py | 71 …nval,pflname, pflsize, locname, ngauss = MEDfield23nValueWithProfile(fid, nomcha, numdt, numo, en… 73 …mps n.%d (%f) [%s], n. d'ordre %d, avec %d valeur(s) par entité.\n"%(numdt,dt,dt_unit,numo,ngauss)) 80 if (typcha.val == MED_FLOAT64): val=MEDFLOAT64(ncomp*nval*ngauss) 81 elif (typcha.val == MED_FLOAT32): val=MEDFLOAT32(ncomp*nval*ngauss) 82 elif (typcha.val == MED_INT32 ): val=MEDINT32(ncomp*nval*ngauss) 83 elif (typcha.val == MED_INT64 ): val=MEDINT64(ncomp*nval*ngauss) 84 else: val=MEDINT (ncomp*nval*ngauss) 183 …locname, type_geo, locsdim, ngauss, geointerpname, ipointstructmeshname, nsectionmeshcell, section… variable 184 …t("\t- Loc. n°%i de nom |%s| de dimension |%d| avec %d pts de GAUSS \n"%(i,locname,locsdim,ngauss)) 186 t2 = ngauss*(type_geo//100) [all …]
|
/dports/french/med/med-4.0.0/tests/f/2.3.1/ |
H A D | test11.f90 | 42 integer ngauss,nloc variable 192 call efgaui(fid, i, locname, type_geo, ngauss, ret) 198 &,"| et nbr. de pts Gauss ",ngauss 200 t2 = ngauss*(type_geo/100) 201 t3 = ngauss 261 integer :: nbpdtnor,pflsize,ngauss,nval local 336 nbpdtnor=0;pflsize=0;ngauss=0;nval=0 462 & '| a ',ngauss,' pts de gauss ' 519 if (ngauss .gt. 1 ) then 527 do m=0,(nval/ngauss-1) [all …]
|
/dports/french/med/med-4.0.0/tests/f/2.3.2/ |
H A D | test11.f90 | 42 integer ngauss,nloc variable 192 call efgaui(fid, i, locname, type_geo, ngauss, ret) 198 &,"| et nbr. de pts Gauss ",ngauss 200 t2 = ngauss*(type_geo/100) 201 t3 = ngauss 261 integer :: nbpdtnor,pflsize,ngauss,nval local 336 nbpdtnor=0;pflsize=0;ngauss=0;nval=0 462 & '| a ',ngauss,' pts de gauss ' 519 if (ngauss .gt. 1 ) then 527 do m=0,(nval/ngauss-1) [all …]
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/PP/src/ |
H A D | dos.f90 | 24 USE klist, ONLY : xk, wk, degauss, ngauss, lgauss, ltetra, nks, nkstot,& 51 NAMELIST /dos/ outdir, prefix, fildos, degauss, ngauss, & local 74 ngauss = 0 85 ngauss1 = ngauss 156 ngauss =ngauss1 158 & "ngauss,degauss=",i4,f12.6/)') ngauss,degauss 163 & "ngauss,degauss=",i4,f12.6/)') ngauss,degauss 167 ngauss =0 169 & "ngauss,degauss=",i4,f12.6/)') ngauss,degauss 217 CALL dos_g(et,nspin,nbnd, nks,wk,degauss,ngauss, E, DOSofE)
|
/dports/french/med/med-4.0.0/tests/c/ |
H A D | test11.c | 66 med_int _ncstp=0,ngauss=0,nloc=0,locsdim=0,lnsize=0; in main() local 271 t2 = ngauss*(type_geo/100); in main() 272 t3 = ngauss; in main() 308 med_int nbpdtnor=0,pflsize,*pflval,ngauss=0,ngroup,nval; in getFieldsOn() local 376 locname, &ngauss) ) < 0 ) { in getFieldsOn() 403 val = (unsigned char*) calloc(ncomp*nval*ngauss,medtype_size); in getFieldsOn() 420 ngroup = ngauss; in getFieldsOn() 426 for (m=0;m<(nval*ngauss)/ngroup;m++) { in getFieldsOn() 457 for (n=0;n<(nval*ngauss);n++) in getFieldsOn() 460 printf(" %f ",*(((med_double*)val)+(m*nval*ngauss)+n ) ); in getFieldsOn() [all …]
|
/dports/french/med/med-4.0.0/src/2.3.6/ci/ |
H A D | MEDchampEcr233.c | 83 med_int ncomp=0, chtype=0, i=0, ngauss=0, pfluse=0; in MEDchampEcr233() local 271 ngauss = type_geo % 100; in MEDchampEcr233() 275 ngauss = MED_NOPG ; in MEDchampEcr233() 279 ngauss = type_geo % 100; in MEDchampEcr233() 292 if (_MEDattrEntierLire(gid_loc,MED_NOM_NBR,&ngauss) < 0) { in MEDchampEcr233() 294 ISCRUTE(ngauss);goto ERROR; in MEDchampEcr233() 319 if ( _MEDattrEntierEcrire(datagroup3,MED_NOM_NGA,&ngauss) < 0) { in MEDchampEcr233() 321 ISCRUTE(ngauss); goto ERROR; in MEDchampEcr233() 367 ncomp,numco,psize,pflmod,modifpfl,pfltab,ngauss,dimd,val) < 0) { in MEDchampEcr233() 382 ncomp,numco,psize,pflmod,modifpfl,pfltab,ngauss,dimd,val) < 0){ in MEDchampEcr233() [all …]
|
/dports/science/quantum-espresso/q-e-qe-6.7.0/PP/simple_transport/src/ |
H A D | ef.f90 | 163 double precision function sumk (et,nbnd,nks,wk,degauss,ngauss,ee) 170 integer, intent(in) :: nbnd, nks, ngauss local 189 if (ngauss .eq. 1) then ! FD 201 else if (ngauss .eq. 0) then ! Gaussian (for zero temperature) 214 else if ( ngauss .eq. 2 ) then ! MP 248 double precision function fermi_en (eig,wk,nbnd,nktot,nelec,temperature,ngauss) 252 integer, intent(in) :: nbnd, nktot, ngauss local 271 sumkup = sumk(eig, nbnd, nktot, wk, temperature, ngauss, Eup) 272 sumklw = sumk(eig, nbnd, nktot, wk, temperature, ngauss, Elw) 281 sumkmid = sumk(eig, nbnd, nktot, wk, temperature, ngauss, Ef)
|
/dports/french/med/med-4.0.0/tests/f/2.3.6/ |
H A D | test11.f90 | 42 integer ngauss,nloc variable 198 call efgaui(fid, i, locname, type_geo, ngauss, ret) 204 &,"| et nbr. de pts Gauss ",ngauss 206 t2 = ngauss*(type_geo/100) 207 t3 = ngauss 267 integer :: nbpdtnor,pflsize,ngauss,ngroup,nval local 344 nbpdtnor=0;pflsize=0;ngauss=0;nval=0 391 & j, ngauss, numdt, numo, dt_unit, & 454 & l,numdt, numo, maa_ass, local, ngauss, ret) 531 if (ngauss .gt. 1 ) then [all …]
|
/dports/french/med/med-4.0.0/tests/f/2.3.2v3.0/ |
H A D | test11.f90 | 42 integer ngauss,nloc variable 217 call mlclci(fid, i, locname, type_geo, sdim, ngauss, giname, isname, nsmc, sgtype, ret) 223 &,"| et nbr. de pts Gauss ",ngauss,"| et dans un espace de dimension ",sdim 225 t2 = ngauss*sdim 226 t3 = ngauss 287 integer :: nbpdtnor,pflsize,ngauss,ngroup,nent,nprofile local 370 nbpdtnor=0;pflsize=0;ngauss=0;nent=0 448 allocate(valr(ncomp*nent*ngauss),STAT=retmem) 461 allocate(vale(ncomp*nent*ngauss),STAT=retmem) 475 if (ngauss .gt. 1 ) then [all …]
|