n_axest (reference) in projects: dports

Project(s)

Full Search
Definition
Symbol
File Path
History
Type

Searched refs:n_axest (Results 1 – 5 of 5) sorted by relevance

/dports/science/v_sim/v_sim-3.8.0/lib/plug-ins/abinit/
H A D	symlist_prim.F90	`70 integer :: n_axest(31) local 89 if(sum((n_axes-n_axest)2)==0) spgroup=1 94 if(sum((n_axes-n_axest)2)==0) spgroup=2 96 if(sum((n_axes-n_axest)2)==0) spgroup=3 98 if(sum((n_axes-n_axest)2)==0) spgroup=4 100 if(sum((n_axes-n_axest)2)==0) spgroup=6 102 if(sum((n_axes-n_axest)2)==0) spgroup=7 104 if(sum((n_axes-n_axest)2)==0) spgroup=7 146 if(sum((n_axes-n_axest)2)==0) then 240 if(sum((n_axes-n_axest)**2)==0) then [all …]`
H A D	symlist_bcc.F90	73 integer :: n_axest(31) local 95 n_axest(:)=0 ; n_axest(7)=1 ; n_axest(8)=1 ; n_axest(9)=1 ; n_axest(20)=1 98 n_axest(:)=0 ; n_axest(7)=1 ; n_axest(8)=1 ; n_axest(15)=1 ; n_axest(18)=1 101 n_axest(:)=0 ; n_axest(7)=1 ; n_axest(8)=1 ; n_axest(16)=1 ; n_axest(18)=1 104 if(sum((n_axes-n_axest)2)==0)exit 111 if(sum((n_axes-n_axest)2)==0) spgroup=15 113 if(sum((n_axes-n_axest)2)==0) then 118 if(sum((n_axes-n_axest)2)==0) spgroup=44 120 if(sum((n_axes-n_axest)2)==0) spgroup=45 122 if(sum((n_axes-n_axest)2)==0) spgroup=46 [all …]
H A D	symlist_others.F90	`70 integer :: n_axest(31) local 92 if(sum((n_axes-n_axest)2)==0) spgroup=5 94 if(sum((n_axes-n_axest)2)==0) spgroup=8 96 if(sum((n_axes-n_axest)2)==0) spgroup=9 101 if(sum((n_axes-n_axest)2)==0) spgroup=36 104 if(sum((n_axes-n_axest)2)==0) spgroup=12 106 if(sum((n_axes-n_axest)2)==0) spgroup=15 108 if(sum((n_axes-n_axest)2)==0) spgroup=38 110 if(sum((n_axes-n_axest)2)==0) spgroup=39 112 if(sum((n_axes-n_axest)**2)==0) spgroup=40 [all …]`
H A D	symlist_fcc.F90	`69 integer :: n_axest(31) local 88 if(sum((n_axes-n_axest)2)==0) spgroup=22 90 if(sum((n_axes-n_axest)2)==0) spgroup=42 92 if(sum((n_axes-n_axest)2)==0) spgroup=43 98 if(sum((n_axes-n_axest)2)==0) spgroup=69 100 if(sum((n_axes-n_axest)2)==0) spgroup=70 105 if(sum((n_axes-n_axest)2)==0) spgroup=196 110 if(sum((n_axes-n_axest)2)==0) spgroup=202 112 if(sum((n_axes-n_axest)2)==0) spgroup=203 114 if(sum((n_axes-n_axest)**2)==0) spgroup=209 [all …]`
H A D	symspgr.F90	107 integer :: n_axes(31),n_axest(31),prime(5),test_direction(3),symrel_uni(3,3) local 246 n_axest=(/0,0,0,0,0,0,0,1,1,0, 0,0,0,0,0,2,0,0,0,0, 0,0,0,0,0,0,0,0,0,0,0/) 247 if(sum((n_axes-n_axest)2)==0)then ! Spgroup 27 (Pcc2) or 32 (Pba2) 268 n_axest=(/0,0,0,0,1,0,0,1,1,0, 0,0,0,0,1,2,0,0,0,2, 0,0,0,0,0,0,0,0,0,0,0/) 269 if(sum((n_axes-n_axest)2)==0)then ! Spgroup 55 (Pbam) or 57 (Pbcm) 289 n_axest=(/0,0,0,0,1,0,0,1,1,0, 0,0,0,0,0,2,0,1,0,2, 0,0,0,0,0,0,0,0,0,0,0/) 290 if(sum((n_axes-n_axest)2)==0)then ! Spgroup 56 (Pccn) or 60 (Pbcn) 317 n_axest=(/0,0,0,0,0,0,1,1,3,0, 0,0,0,0,0,0,0,0,0,3, 0,0,0,0,0,0,0,0,0,0,0/) 318 if(sum((n_axes-n_axest)2)==0) additional_info=1 321 n_axest=(/0,0,0,0,0,0,1,1,3,16, 0,0,0,0,0,0,0,0,0,3, 0,0,0,0,0,0,0,0,0,0,0/) [all …]