Home
last modified time | relevance | path

Searched refs:iscreen (Results 1 – 25 of 57) sorted by relevance

123

/dports/science/berkeleygw/BGW-2.0.0/Common/
H A Dfixwings.f9089 if (iscreen==SCREEN_SEMICOND) then
97 if (iscreen==SCREEN_SEMICOND) then
100 if (iscreen==SCREEN_GRAPHENE) then
121 if (q0flag .and. iscreen==SCREEN_SEMICOND) then
153 if (iscreen/=SCREEN_METAL) then
204 if (iscreen==SCREEN_SEMICOND) then
207 if (q0flag .and. iscreen==SCREEN_SEMICOND) then
213 if (iscreen==SCREEN_SEMICOND) then
216 if (iscreen==SCREEN_GRAPHENE) then
233 if (q0flag .and. iscreen==SCREEN_SEMICOND) then
[all …]
H A Dcheck_screening.f9026 integer, intent(in) :: iscreen local
36 if (iscreen==SCREEN_METAL .and. q0len<TOL_SMALL) then
44 if (iscreen==SCREEN_GRAPHENE .and. q0len<TOL_SMALL .and. itruncflag==TRUNC_NONE) then
63 itruncflag/=TRUNC_SLAB) .and. iscreen/=SCREEN_METAL .and. q0len>=TOL_SMALL) then
H A Dinread_common.f90145 logical function try_inread_screening(keyword, line, iscreen)
147 integer, intent(inout) :: iscreen local
157 iscreen = SCREEN_SEMICOND
159 iscreen = SCREEN_GRAPHENE
161 iscreen = SCREEN_METAL
H A Dkernel_io.F90160 kernel%iscreen = xct%iscreen
205 call check_I('screening flag', xct%iscreen, kernel%iscreen)
H A Dvcoul_generator.f9058 isrtq, iscreen, qvec, q0vec, vcoul, iwritecoul, iparallel, avgcut, & argument
82 integer, intent(in) :: iscreen local
199 if (abs(qlen)<TOL_ZERO .and. iscreen==SCREEN_METAL .and. &
389 select case (iscreen)
565 if (iscreen==SCREEN_SEMICOND) then ! semiconductor
644 if (iscreen/=SCREEN_METAL) then ! semiconductor or graphene
651 if (iscreen==SCREEN_GRAPHENE) then
H A Dkernel_io_inc.f9051 READWRITE()(iunit FORMAT) kernel%iscreen, kernel%icutv, kernel%ecuts
75 call MPI_BCAST(kernel%iscreen, 1, MPI_INTEGER, 0, MPI_COMM_WORLD, mpierr)
H A Dtypedefs.f90268 …integer :: iscreen !< what type of screening is present. 0 = semiconductor, 1 = graphene, 2 = metal component
635 …integer :: iscreen !< what type of screening is present. 0 = semiconductor, 1 = graphene, 2 = metal component
931 integer :: iscreen !< screening flag component
/dports/science/nwchem-data/nwchem-7.0.2-release/src/ddscf/
H A Dschwarz.fh4 c iscreen(1) counts rejects in outer ij atom loop
5 c iscreen(2) counts rejects in inner ijkl atom loop
6 c iscreen(3) counts accepts in inner ijkl atom loop
7 c iscreen(4) counts rejects in inner ijkl shell loop
8 c iscreen(5) counts accepts in inner ijkl shell loop
9 C iscreen(6) counts number of Fock builds
11 integer iscreen, nscreen
14 common/cscreen/iscreen(nscreen)
H A Dfock_2e_b.F101 iscreen(3) = iscreen(3) + 1
236 iscreen(5) = iscreen(5) + 1
238 iscreen(4) = iscreen(4) + 1
H A Dschwarz_pr.F22 call icopy(nscreen, iscreen, 1, totals, 1)
H A Dao_fock_2e.F162 iscreen(6) = iscreen(6) + 1
H A Dgraveyard888 call ifill(nscreen, 0, iscreen, 1)
997 iscreen(3) = iscreen(3) + 1
1071 iscreen(2) = iscreen(2) + 1
1079 if (kat .eq. 1) iscreen(1) = iscreen(1) + 1
1192 iscreen(5) = iscreen(5) + 1
1194 iscreen(4) = iscreen(4) + 1
/dports/science/nwchem/nwchem-7b21660b82ebd85ef659f6fba7e1e73433b0bd0a/src/ddscf/
H A Dschwarz.fh4 c iscreen(1) counts rejects in outer ij atom loop
5 c iscreen(2) counts rejects in inner ijkl atom loop
6 c iscreen(3) counts accepts in inner ijkl atom loop
7 c iscreen(4) counts rejects in inner ijkl shell loop
8 c iscreen(5) counts accepts in inner ijkl shell loop
9 C iscreen(6) counts number of Fock builds
11 integer iscreen, nscreen
14 common/cscreen/iscreen(nscreen)
H A Dfock_2e_b.F101 iscreen(3) = iscreen(3) + 1
236 iscreen(5) = iscreen(5) + 1
238 iscreen(4) = iscreen(4) + 1
H A Dschwarz_pr.F22 call icopy(nscreen, iscreen, 1, totals, 1)
H A Dao_fock_2e.F162 iscreen(6) = iscreen(6) + 1
H A Dgraveyard888 call ifill(nscreen, 0, iscreen, 1)
997 iscreen(3) = iscreen(3) + 1
1071 iscreen(2) = iscreen(2) + 1
1079 if (kat .eq. 1) iscreen(1) = iscreen(1) + 1
1192 iscreen(5) = iscreen(5) + 1
1194 iscreen(4) = iscreen(4) + 1
/dports/science/xtb/xtb-6.4.1/src/
H A Dlocal.f9074 integer :: iscreen,icoord,ilmoi,icent ! file handles local
270 call open_file(iscreen,'xtbscreen.xyz','w')
336 write(iscreen,*) nat+1
337 write(iscreen,*)
457 write(iscreen,*) nat+1
458 write(iscreen,*)
462 write(iscreen,'(a2,3F24.10)') toSymbol(1),dtot(1:3)*autoaa
473 write(iscreen,*) nat+1
474 write(iscreen,*)
478 write(iscreen,'(a2,3F24.10)') toSymbol(1),dtot(1:3)*autoaa
[all …]
/dports/science/berkeleygw/BGW-2.0.0/BSE/
H A Dinread_kernel.f9059 xct%iscreen=SCREEN_SEMICOND
160 elseif(try_inread_screening(trim(keyword), trim(line), xct%iscreen)) then
191 select case (xct%iscreen)
H A Dkernel.f90223 crys%bdot,crys%celvol,kg%nf,xct%ng,isrtq,xct%iscreen,vq,xct%q0vec, &
231 crys%bdot,crys%celvol,kg%nf,xct%ng,isrtq,xct%iscreen,vq,xct%q0vec, &
247 if (xct%theory .ne. 1) call check_screening_trunc(xct%icutv,xct%iscreen,xct%q0vec,crys%bdot)
251 crys%bdot,crys%celvol,kg%nf,1,isrtq,xct%iscreen,vq,xct%q0vec, &
261 crys%bdot,crys%celvol,kg%nf,1,isrtq,xct%iscreen,vq,xct%q0vec, &
H A Dinread.f90101 xct%iscreen=SCREEN_SEMICOND
373 elseif(try_inread_screening(trim(keyword), trim(line), xct%iscreen)) then
639 select case (xct%iscreen)
669 if (xct%icutv==TRUNC_NONE .and. xct%iscreen==SCREEN_SEMICOND) then
/dports/editors/vigor/vigor-0.016/docs/interp/
H A Dspell.ok28 iscreen
/dports/x11-wm/wmii-devel/wmii+ixp-3.9.2/cmd/wmii/
H A Dview.c109 view_init(View *v, int iscreen) { in view_init() argument
110 v->r[iscreen] = screens[iscreen]->r; in view_init()
111 v->areas[iscreen] = nil; in view_init()
112 column_new(v, nil, iscreen, 0); in view_init()
/dports/x11/libX11/libX11-1.7.2/src/
H A DOpenDis.c72 int iscreen; /* screen number */ in XOpenDisplay() local
129 if(!_XConnectXCB(dpy, display, &iscreen)) { in XOpenDisplay()
203 dpy->default_screen = iscreen; /* Value returned by ConnectDisplay */ in XOpenDisplay()
493 if (iscreen >= dpy->nscreens) { in XOpenDisplay()
/dports/science/berkeleygw/BGW-2.0.0/Sigma/
H A Dinread.f90122 sig%iscreen=SCREEN_SEMICOND
403 elseif(try_inread_screening(trim(keyword), trim(line), sig%iscreen)) then
726 select case (sig%iscreen)
755 if (sig%icutv==TRUNC_NONE .and. sig%iscreen==SCREEN_SEMICOND) then

123