ELF>@k@@AWAVAUATUSHH$HDŽ$DŽ$HDŽ$DŽ$LH$DŽ$DŽ$H$%H$DŽ$DŽ$$ DŽ$HDŽ$DŽ$3HDŽ$DŽ$HDŽ$DŽ$DŽ$0DŽ$H$H$H$HDŽ$DŽ$4DŽ$DŽ$H$H$H$H$HDŽ$DŽ$6HDŽ$DŽ$HDŽ$DŽ$DŽ$0DŽ$H$H$H$HDŽ$DŽ$7HDŽ$DŽ$DŽ$DŽ$H$HH$H޿uDHmesh_k DŽ$ H$H f$H$H$H$HDŽ$DŽ$9H$DŽ$܎HDŽ$DŽ$DŽ$DŽ$H$HDŽ$DŽ$:HDŽ$DŽ$܎HDŽ$DŽ$DŽ$DŽ$$QH$ @ vH$HDŽ$DŽ$QHDŽ$DŽ$HDŽ$DŽ$DŽ$0DŽ$H$H$H$HDŽ$DŽ$RDŽ$DŽ$H$H$0H$1ɺHDŽ$@ H$0HDŽ$PHDŽ$XHDŽ$HHDŽ$8H$$$$= NH$HDŽ$DŽ$UHDŽ$DŽ$DŽ$DŽ$H$H$A1H$HDŽ$DŽ$XHDŽ$DŽ$HDŽ$DŽ$DŽ$0DŽ$H$*H$H$HDŽ$DŽ$YDŽ$DŽ$H$H$H$H$H$H$H$H$HDŽ$DŽ$[HDŽ$DŽ$HDŽ$DŽ$DŽ$0DŽ$H$H$H$HDŽ$DŽ$\HDŽ$DŽ$DŽ$DŽ$H$H$H$$D$ ƒ߀TtYt <1D$ L$H$HA1$ A A^ȿ1A  ^  ^  ^  ^  ^  ^  ^  ^ H$HDŽ$DŽ$nHDŽ$DŽ$.DŽ$DŽ$DŽ$KdHcH$HDH4$uCH$AH$HDŽ$DŽ$pHDŽ$DŽ$1DŽ$DŽ$DŽ$KdHcH$HDH4$uCH$H$HDŽ$DŽ$qDŽ$DŽ$H$H$H$H$H$HDŽ$DŽ$wHDŽ$DŽ$DŽ$DŽ$H$H$H$ *q)R1D$)ٸH$AHDŽ$DODŽ$zHDŽ$Dt$ DŽ$DŽ$DŽ$H$HcHHHHHD$AFD$$H$HDŽ$DŽ$|HDŽ$DŽ$ DŽ$DŽ$D\$ DŽ$E~YIADŽ$MADD$AI AtRH$L$tH$HH;l$%;\$t. xD$I$AD;d$$b밋$ 1D$ $$$B 1$$$\ 1D$Aʼn$$\$DŽ$A9ʼn$D)1ҋ$Dl$X1ۃ|$TD$8$D$,$)ljD$4)$ȉ$؉$DT$,D|$4D$TE+9D$4$1t$,D$$D$A~D$($|$PD$0))D$|ȉ|$x؉$DL$(Dl$0D$PE9D$0nD$x1t$(D$$ƍC1D$tHcHT@\L0H‰\$pHHHH@HH\$`HH\$hH$;HH\$HH$0HHD$@D$\HL$HHD$`DD$\H\$ht$X$)HL$@LEDlE<$At$)wD\AD$<A AA AAqAAAAAAI$AAIAQ Aq$AIAAʉ$DfD9HN}=y@xAAHt+HcAHVHN9|)ЉD$D$H$4$1ɸHH 9xD;BHuD;u;ZuH\$H+;u0HcH;tH\$@;+Dl$(I H;|$p#\$t\$$l$D|$,|$\l$8D$D$X|$8H$DŽ$HDŽ$DŽ$HDŽ$DŽ$DŽ$DŽ$H$DŽ$H$0fWL$;L$0H$PHD$AE1AU*AA*6IcD*$A*^*$A*NDY*$HT$D$HDŽ$XDŽ$`HDŽ$DŽ$hD^DŽ$PDŽ$T(tH@Y^XAXDDYD^AXDDYYĘD^YY5^^XAXDDYY D^^AXĠf(^XXXĨH$HLHIvHIvHLHHt$HHT$D$AII HD$A9D$<I$D$\9D$<AT$]A9D$|1$D$$bA9$1$D$H$DŽ$HDŽ$DŽ$HDŽ$H$PDŽ$DŽ$E1DŽ$H$HHDŽ$XDŽ$`HDŽ$DŽ$HDŽ$DŽ$DŽ$P0DŽ$THHHHDŽ$XDŽ$`HDŽ$DŽ$ DŽ$PDŽ$TH$HHH$HHHHDŽ$XDŽ$`HDŽ$DŽ$DŽ$PDŽ$THHHDŽ$XDŽ$`HDŽ$DŽ$DŽ$PDŽ$TH$HHEDŽ$ H$0L$0tL$Ȏ1HD$T$ t;HHDŽ$XDŽ$`HDŽ$DŽ$M}DŽ$PDŽ$TH$H1HD$HHt I4HHD$$PtHLHCHIHD$IA9܉$L$ @$;2HHDŽ$XDŽ$`HDŽ$DŽ$DŽ$PDŽ$T3HHHHDŽ$XDŽ$`HDŽ$DŽ$DŽ$PDŽ$T3HHHHDŽ$XDŽ$`HDŽ$DŽ$DŽ$PDŽ$TH3HHHDŽ$XDŽ$`DŽ$PDŽ$THHDŽ$XDŽ$`DŽ$PDŽ$THĸ[]A\A]A^A_Ѥ$D$ Ѥ$D$ nHHDŽ$XDŽ$`HDŽ$DŽ$M}DŽ$PDŽ$TH$H1I4HHD$$PuHD$HHuLHHt$HHE$ŸLcE$mŸLcѤ$D$D$ H$HDŽ$DŽ$EHDŽ$DŽ$HDŽ$DŽ$DŽ$0DŽ$H$H$H$HDŽ$DŽ$FDŽ$DŽ$HsH$H$$H$HDŽ$DŽ$IHDŽ$DŽ$DŽ$DŽ$H$H$H$HDŽ$DŽ$JHDŽ$DŽ$HDŽ$DŽ$DŽ$0DŽ$H$H$H$HDŽ$DŽ$KDŽ$DŽ$Hs H$H$H$HDŽ$DŽ$LHDŽ$DŽ$DŽ$DŽ$H$H$H$HDŽ$DŽ$MHDŽ$DŽ$HDŽ$DŽ$DŽ$0DŽ$H$H$H$HDŽ$DŽ$NDŽ$DŽ$H$Hs(H$H$HDŽ$DŽ$=HDŽ$DŽ$H$ HDŽ$DŽ$DŽ$0DŽ$H$H$H$HDŽ$DŽ$>DŽ$DŽ$HsH$H$$H$HDŽ$DŽ$AHDŽ$DŽ$HDŽ$DŽ$DŽ$0DŽ$H$H$H$HDŽ$DŽ$BDŽ$DŽ$HsH$H$$t$ :IE1H$P%fAWAVAUATIUSAHT$8LL$؅^DD:ID$LIcH,@HD$DLDDDA |YAEA‹AADIDDQD$EDADDQDy EAADT$ADlj|$Df9MA}4y @xBDAEBt"McEIyMAD<9|)BDDT$\$HDt$E1 IH D9}[D;Mu;_uD;wuHL$HACu@CDLcICtADC[]A\A]A^A_HD$؃D$H$\$9[]A\A]A^A_Ë6DO DDDWDDADGODwWDDGDG DA HL$Љkpoints.f90(/,5x,'***************************************************',/, 5x,'* *',/, 5x,'* Welcome to the special points world! *',/, 5x,'*________________________________________________ *',/, 5x,'* 1 = cubic p (sc ) 8 = orthor p (so ) *',/, 5x,'* 2 = cubic f (fcc) 9 = orthor base-cent. *',/, 5x,'* 3 = cubic i (bcc) 10 = orthor face-cent. *',/, 5x,'* 4 = hex & trig p 11 = orthor body-cent. *',/, 5x,'* 5 = trigonal r 12 = monoclinic p *',/, 5x,'* 6 = tetrag p (st ) 13 = monocl base-cent. *',/, 5x,'* 7 = tetrag i (bct) 14 = triclinic p *',/, 5x,'***************************************************',/ )no(5x,a)bravais lattice >> filout [mesh_k] >> (a)unknowninfoenter celldm(3) >> enter celldm(2) >> enter celldm(4) >> enter celldm(5) >> cos(ac)enter celldm(5) >> enter celldm(6) >> cos(ab)enter celldm(6) >> mesh: n1 n2 n3 >> (5x,i6) Nnptx too small for this meshkpointsmesh: k1 k2 k3 (0 no shift, 1 shifted) >> write all k? [f] >> (a1)(2x,'crystal axis: '/3(2x,'(',3f7.4,') '/) )(2x,'reciprocal axis: '/3(2x,'(',3f7.4,') '/) ) Omega (in a^3 units) = (//,1x,i3,2x,a19)symmetry operations(1x)(6(3i3,2x))(/)(' k(',i3,')=( ',i2,' ',i2,' ',i2,' ) --- weight=', i3,' |folds in point #',i3)(/5x,a)# of k-points == (i5,a5,i5) of (2x)(i5)(i5,1x,3f11.7,f7.2,i4)(i5,1x,3f11.7,f7.2)!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!the considered mesh has not the correct symmetry!!(5x,a/)DH1H?c .!-;h Nr@@@ iԽ@ ieq@ j@ kT kwE l n@ n1 n2 n3 n6 nf nkн@b@b@b@aؽ@r xkb xkw4J I h UbT Q4 ! h gU T Q R7XLmEP[fyb yxUbUbxUb%UbT QD?UbYUbUbTԽ@Q4UbxUbUbT QDUbUb9UbTsQNSUbpUNTsUbUbxUbUbT QDUbUbJUbTTQ4R0dUbx~UbUbxUbUbT Q*UbUb:UbT@Q4aUbT@Q4UbT@Q4UbxUbUbT QDUbUbCUbT@Q1]UbUԽ@T@Yؽ@xUbUbQ8Ubx Ub UbQ8: UbxT Ub UbT QH UbTؽ@Q8 Ubx Ub UbQ43 UbT QCM Ubxg Ub Ubx Ub UbT~Q4 Ubx Ub Ubx& UvK UvT@Q4n UvT~Q4 UvT~Q4 UvT~Q4 UvT}Q4 UvT@Q4 Uvx/ UbI Ubxa Uv UvT QC Uvx Uv UvTн@Q4 UvT Q5/ UvT@Q4G Uvx_ Uvw Uvx Uv UvTн@Q4 Uvx Uv UvT@Q42UvT@"Q8UUvT~Q8mUvxUvUvT Q3UvxUv UvT Q3#Uvx;UvfUvT Q3~UvUvUvxUvUvT@Q4UvT@"Q87UvT~Q8]UvT@Q4uUvxUbUbT QDUbUb#UbTsQ8.UbxHUbtUbT QKUbxUbUbT QDUbUb#-UbTs Q8GUbxaUbUbT QKUbxUbUbT QDUb!Ub#FUbTs(Q8`UbxzUbUbT QDUbUb#UbTsQ8Ubx3Ub_UbT QDyUbUb#UbTsQ8 Ubus * * *0JatJbgJaa * *!"#n#k#kw(#ieq7#sF$$b%r&*%'j&*'krb&*%'np&*( *(*)7(*)F(*b * *(*)r *"#s#i#j#k#ri#rj#rk * **)a **)+* N *+* Na4 *+* N)aE+* N!J,F!U,7!`,(!k,-my.t(7F y-y[/u/y/0$z1h1z<HUUTTVlU7T 3,23313,456rec*(5B05B85z@5zH5P5T5zX5z`5h5l5zp6uHx7id<x7pos*8z888z8z888z7padz888z8z89(<555z555z5< ,,*)`Y:Y;Vx<23232331323233132323313=33z2&3&,,955(5,5z05z85@5D5zH5zP5X5\5z`5zh5p5t5zx5z556padz5z555z5z555z5z555z5<233133;a<;k<23313u23,98#55z(502<33132P33P,z>33<% B U$ >  .: ; j6 @Bj6 : ; ': ; I4: ; I4: ; I 4: ; I 4: ; I  'I 1B1RUX Y 111I1I U4141411RUX Y 11<.?: ; n<4: ; nI?<4: ; nI?< I !I/ !&I".?: ; #: ; I$: ; I%4: ; I&4I4'4: ; I(!I)I* +!I/, I-.1n@B.1I/10.?: ; I@B1: ; I2.?<3I4 5 I8 6 I8 7 I88 I89 :!I" / ;.?: ; n<<=.?I<>.?<@@341234SPSP1123434214PsPs34123411]]___]@]@0^@@@@P0@@@101@@1@@@@@EETT@@1011 ̼@#̼@XRXR t2$" PpP t2$" Pbbbbbbu $ &312$" u $ &312$" u $ &322$" u $ &322$" u $ &132$" u $ &132$" YYy\uUq|Q|Qr}R}RxXyqq11 u $ & u $ &1#ZXZXy2$}"PpPy2$}"P y $ & y $ &v2$t"v2$t"312$t"v~2$t"v~2$t"322$t"v}2$t"v}2$t"332$t"RRr\tTqQrRxXUUtT<;#$" kpoints.f90  6g(VasDdh  guxX *sX aEO=:==:==?[\0JʪZ\0JxZ(u=oXj/xX&/xm/I.Ys/zX4uf"G1v:CXZGxu9CFYat|0!"[$0kpoints.f90MAIN__options.61.2164.LC2_gfortran_st_write_gfortran_st_write_done_gfortran_transfer_character_write_gfortran_st_read_gfortran_transfer_integer_gfortran_st_read_done_gfortran_transfer_character_gfortran_string_len_trim_gfortran_st_open_gfortran_transfer_array_gfortran_transfer_integer_writeerrore___cell_base_MOD_atlatgen___cell_base_MOD_bgrecips__gfortran_transfer_real_write__symm_base_MOD_set_sym_bl__symm_base_MOD_nrot__symm_base_MOD_s_gfortran_st_close_gfortran_transfer_realcheck_ruotaijk_main_gfortran_set_args_gfortran_set_options! 8 fs{  L N  T$1E k  L N  h2 I |o $ J^ u    L' NM_ $dq  V m 8 @  D H d!  L N@R pWdx   $ L; Nas x  A "0F "K "\#k $0s"y $~ $ "0 " """"",","""""4 "4 "  " ! "$- "$5 "<A "<F %Z q   " &  * P | $ &      & % '9 P 1v  (  B   (  U@ M _ )e )  Y '  B Y (( )  d|$  h$1$,I$V$$g$x$ $4$<    / A I  dBO^ u L    - 7 ?T \k     r   & &a x N 0  N h- D jw 0| * *A X  && o  L N  !7+Df } N   L  N/A FSg +  N %9 P Lg N  +' > L] N  + ( ? LV N|       + / 0 V  W & - 4 ;v  &    < ," P> L Z Wh v   1      `!:@JdudHD  X    P   ' /D M [c Pn 7w u   U    jw(T&5@oZh"s:TqNQh$uK$eD[ph;be|D^`J    T   !  ;  U  r   $ ) z    % B4  N D h Q  + F   ' L o  # 3 E M F0 SJ b }    1 C  X0 `H ` x      3Vn0h "$n<W0g8^v%;H/Ifu3JW .Hb)"Ga{  4 Q` z  ! 7   *    % I3 A ^d )n 6   k $ ,u $z v  z0! h        b    9   " + 4 5=r!E P Y b k 5t }  a "    W R  q  $ ) Icm      ! 9 S      L  .* Q \ ag r }        v  M  |     ( 2 \ c h Zn yy       < @ - 7 A K YU _ i s } 2  p   b r       A    ' 1 r; E vO Y Mc am w  4            $ Z= W <,_ !.!<DPX`d`lx  E E      _    Q v   ( 0 < DPXdlx66"" >C _,_4.!PXcdclxS{X!{)4!<.!W_{j{rS !.!   v v  $;=;E` h t |     $$66CJJ&_2 !:.!X`}o{w}{}{}){1PX}g{oXX[{{ /p7BJU]hp0::I0::I7?[N{Vu}[{[{[ {# U ] [ {   [ {  % [0 {8 C K h 0!p r!| r! " 0! E! E! " " " " " " " 0! f!+ f!3 "? "G "T "\ "h "p " 0! r! r! " 0! r! r! " 0! ," ," ") "1 "> "F "b 0!j "v "~ " 0! 2! 2! " 0! r! " " " "9 !A "L "T !"_ !"g 5"r 5"z I" " " " " P" S" S" [" """"50!=2!R2!Z"r!"""r!"""r!"""5r!="O"W"i"q"r!"""""r!"""1"9"ar!ix"t"|"""""";#""";#"&"2":;#W"_#k#s;#$$   ([0{8PX`hpxpr!!!!;#$/ p0!"