projection of quasi-crystals note the following assumption input data ********************************************************* origin of the vector ej should be in a occupation domain ********************************************************* (0) inpm, iphas inpm=0 separatel file (standard input, flnm1 and flnm2) =1 standard input only iphas=1 for periodic phason (long-wavelength phason) 0 for non-periodic phason (liniear phason) (1) title (2) isys,a,(c),eps1,eps2,eps3,eps4,eps5,eps6,ists isys: 1 icosahedral or its pentagonal distortion 2 icosahedral or its cubic or orthrhombi distortion (***icosahedral or its trigonal distortion) 3 decagonal or its orthorhombic distortion 4 octagonal 5 dodecagonal a,c : lattice papameter eps1: pentagonal phason distortion (isys=1) cubic phason distortion (isys=2) eps2: orthorhombic phason distortion 1 (1,1 element) (isys=1 (***trigonal phason distortion (3,3) element (isys=2)) eps3: orthorhombic phason distortion 2 (2,2 element) (isys=1 (***trigonal phason distortion (1,1)=(2,2) element (is eps4: monoclinic phason distortion 3 (1,2 element) (isys=1,3 orthorhombic phason distortion (2,2) element (isys=2) difference from cubic eps5: monoclinic phason distortion 4 (2,1 element) (isys=1,3 orthorhombic phason distortion (3,3) element (isys=2) difference from cubic eps6: phonon distortion (along z-axis isys=1,3) trigonal phonon distortion 2 (isys=2) ists: 0 true site symmetry operators are used 1 fictitious site symmetry operators are used for all at (3) na npod ne isim imod na: number of atoms npod : number of predefined occupation domsins ne : number of elements isim: order of similarity transformation isim = 0 no magnification isim > 0 deflate by tau**-isim times isim < 0 inflate by tau**-isim times isim=-2,-1,0,1, or 2 etc. tau: ratio of selfsymilarity =(1+sqrt(5))/2=1.618 for decagonal and face-centered icosahed =sqrt(2)=1.414 ? for octagonal imod: 1: lattice constant a is multiplied by tau**isim this makes inflation or deflation impossible but isim > 0 and imod=1 may be effective for reducing the value of ihmax in (8) and for fast calculation 0: no multiplication for the lattice constant ******** if inpm=0 skip (4) ****** (4) flnm1 flnm1 : filename which gives the following items ******** if inpm=1 skip (01)-(07) ****** ####################################################################### (01) nsymo,icent,brv nsymo: number of generators in symmetry operations icent: give 1 for centrosymmetric otherwise give 0 brv : 'p','i','f' 's' 'c' bravais lattice s in icosahedral ==> face-centered superlattice s in decagonal ==> Edagawa type superlattice s translates x,ej,xi in the normal lattice into those in superlattice in decagonal case, s also translates sym. op in norma lattice into those in superlattice c P_2c for color symmetry 'g' is for the groupoid symmetry in quasicrystal ************************************************************* when brv='s', give x0,xe,xi,ej in the fundamental cell. they are transformed into those of the supercell in the progr ************************************************************* (02) 'symmetry operator' header and (03) symmetry operator in the I.T. format: x,y,z,t,u,v etc. ***** repeat (03) nsymo times (03') if brv='g' hull element (header) hull operator in the IT format including x,y,z,t,u,v and centering translations repeat this ig times. (03") innn: number of repeats of transformation given above ****** (isys=4,brv='s' only)****** (04) n,nej0,itype,str (*) n : serial number for the guide to the eye nej0 :number of edge vectors for predefined occupation domain itype : 1 domain with icosahedral, degagonal or octagonal symm. 2 domain with other symmetry -1 domain with icosahedral, degagonal or octagonal symm. -2 domain with other symmetry for test str : string for comments (05) ej ej: edge vectors of two triangles in the 6D coordinate syste repeat (5) nej0 times ***************notice**************** the internal components of consecutive ej are regarded a the consecutive edge vectors of the polyhedron defining the occupation domain ***************notice*************** (06) nth, (mej(1),mej(2),,),... nth times nth: number of tetrahedra mej: a triplet of vector numbers specifying a tetrahedron (for isys=1,2) mej: a pair of vector numbers specifying a tetrahedron (for isys=3,4,5) (07) iaslct(1-(nsymo+icent*nsymo)) (60i1) 1:selected, 0:skipped ** ******** repeat (01)-(07) npod times ###################################################################### ******** if inpm=0 skip (5) ****** (5) flnm2 flnm2 : filename which gives the following items ******** if inpm=1 skip (01)-(08) ****** ###################################################################### (01) no,symb,ien,ish,nev,be,bi,ramin,ramax,p,s1,s2 (*) no: atom number symb: site symbol ien: element number (1:Al 2:Mn etc.) if ish > 0: ish-th predefined occupation domain else for icosahedral case ish=0 polyhedron ish=-1: ellipsoid ish=-2: sphere ( rmax: the radius of the sphere in a ) for dihedral case ish=0 triangle ish=-1: ellips ish=-2: circle ( rmax: the radius of the sphere in a ) nev: number of edge vectors for ish=0 (<=nemax=50) number of principal axes (=2 or 3) for ish=1 consequtive three vectors are regarded as the edge vector of a tetrahedron defining the occupation domain (ish=0) be: isotropic temperature factor in external space bi: isotropic temperature factor in internal space ****** for decagonal case ***** be: isotropic temperature factor in the plane normal to 10 bi: isotropic temperature factor along 10 ramin : scale for unoccupied tetrahedron or rhombohedron ramax : scale for occupied tetrahedron or rhombohedron if ish=2 ramax=1 means shere with radius of 1.4325 (ca) (radius of the shere equivalent to unit triacontahedron creating the 3d penrose pattern) p : occupation probability s1 : percentage of first component s2 : percentage of second component (** one site is assumed to be occupied by two atoms**) ***** ish=-1 to use truncated triacontahedron ***** ra or rb=1 corresponds to the triacontahedron with unit edge length (02) x0(1)-x0(6): coordinate of atom in 5D, or 6D for dihedral an (03) xe1(1)-xe1(6),u1 shift vector in ve and magnitude (5D,6D or (04) xe2(1)-xe2(6),u2 shift vector in ve and magnitude (5D,6D or (05) xe3(1)-xe3(6),u3 shift vector in ve and magnitude (5D,6D or (06) xi(1)-xi(6),v shift vector in vi and magnitude (5D,6D or 7D 5D: octagonal, 6D: decagonal and icosahedral 7D: dodecagonal ****** for colored atom give xi(6)=1 (normal color) or -1 (inverse color)******** ****** colored atom should be black (icol=0) or white (icol=10) ** ******** colored symmetry is only available for polygonal cases ** ******* if(ish.gt.0) skip (07) (08)**** the following judge is used for icosahedral cases rimax: maximum |ej| rimin: minumum |ej| which is calculated in getnii or in getnid ri > rimax out of the domain ri < rimin in the domain rimax > ri > rimin need accurate calculation using the domain shape Note that this is not correct in general Please include the origin in the domain ************************************************ ###################################################################### (5') itempf If itempf=1 xe1,xe2,xe3 are used to describe anisotropic temperature fact however if xe1 and xe2 are orthogonal then third axis orthogo to them are used neglecting specified xe3. in this case zero vector xe3 can be specified if it is not necessary as a shift vector but if more than two of them is zero, cartesian coordinate sy in the external space is used instead for that atoms (or OD) (6) flnm3 filename for the data given by (60)-(61) (60) nx (61) z,jz,(ja1(j),ja2(j),ea(j),j=1,jz) z : independent parameter jz : number of terms related with z ja1: atom number ja2: u,v,be,be,ramin,ramax,p,s for 1-8 ea : coefficient u,v,etc. = z*ea *******repeat (61) nx times******** if itempfi=0 skip (7) (7) itempfi (80i1) itempfi : 0 for iso 1 for anisotropic temperature factor for individual atom (8) icont icont=0 : does not use parameters in flnm4 file 1 : use parameters in flnm4 file (9) flnm4 filename of the parameter file (10) jaslct (80i) atom selection: if j-th column is 1 or 0 j-th atom is selecte (11) iel (iel(1)-iel(3)) iel : kind of atom for first, second and third atoms in scattering factor table (1<=iel(1),iel(2),iel(3)< (repeat ne times) atp if(isys<=2) skip iarrow (12) job,icase,ihmax,iatom,iwxy,ldev,inum if(isys>=3) (12) job,icase,ihmax,iatom,iwxy,ldev,inum,iarrow job=0 plot projection of quasi-crystal along an axis =1 generation of structural data (for prjap and iatom) (serial No. OD No. element No. x y z p1 p2 p3) =-1 generation of structural data (serial No. OD No. x y z h qe qi) icase= 1: projection along n-fold axis (n=5,8,10,12) z: n-fold (z-) axis in dihedral quasicrystal y: y axis in dihedral quasicrystal 2: projection along 3-fold axis z: 3-fold axis in cubic approximant x: 2-fold axis in cubic approximant 3: projection along 2-fold axis z: 2-fold (y-) axis in pentagonal quasicrystal x: 5-fold axis (z-) in pentagonal quasicrystal 4: projection along z-axis in cubic approximant z: z-axis in cubic approximant x: x-axis in cubic approximant 5: projection along specified direction ihmax: maximum indices, -ihmax<=h(i)<=ihmax default=3 for decagonal (usually ihmax<=5) for job=2 ihmax=1 should be sufficient if an appropriate isim is chosen ? (isim = -1 ?) iatom= 1: plot atoms 0: plot no atoms iwxy : give 1 to output x-y coordinate of plotted atoms and bond length (if |job|=1, output x, y, z coordinates) ldev : 1 B & W display or printer, 2 color display or printer inum : 1 plot atom number 0 no atom number iarrow: 1 write arrow parallel to xe1 0 no arrow *** xe1 should be the vector normal to n-fold axis (n=8,10,12)*** ************if job=1 or job=-1 geve (12') else skip (12')***** (12') iel0 element number in periodic table for iel 1,2,..ne **************if(icase is not equal to 5, skip (13)************ (13) q3,q2 (six-dimensional vector specifying directions) q3: z-axis (projection axis) q2: y axis 0,1,1,0,0,0 x-axis in cubic approximant 1,0,0,0,1,0 y-axis in cubic approximant 0,0,0,-1,0,1 z-axis in cubic approximant ************************************************************** ********if iatom=0 skip (14) ******* (14) icntsm icntsm(i) i=1,ne : center symbol coresponding to ien 0: sphere 1: sphere 2: triangle 3: square 4: pentagon 5: star (15) amag amag: magnification (cm/angstrom) (15_1) x0o x0o: 6D coordinate of origin (-0.5<orign(i)<0.5) (15_2) x0e x0e: 6d coordinate its external part is added to x0o (15_3) x0i x0i: 6d coordinate its internal part is added to x0o+x0e when brv='s', give x0,x0e,x0i in the fundamental cell with the lattice constant a0=a/2. origin = x0o+x0e+x0i ****if job =2 then (16) xmin,xmax,ymin,ymax,zmin,zmax,shiftx,shifty xmin-xmax: view area in angstrom ymin-ymax: view area in angstrom zmin-zmax: view area in angstrom shiftx: shift before plot in cm default max(2,-xmin*amag+2) shifty: shift before plot in cm default max(2,-ymin*amag+2) ****if job =2 then (16) dmin, dmax dmin : minimum interatomic distances to be calculated dmax : maximum interatomic distances (17) ncp (ncp <= 20) ncp: number of atoms with concave parts in the occupation do ***** if ncp=0 skip (18) (18) npart atm npart : number of concave parts (with a negative occupation probability) of the occupation domains of the atom specified by atm0 atm : atom number with positive occupation probabilities followed by (npart) related atoms with negative occupa probabilities ***** repeat (18) ncp times ***** **********if job=0 or +-1 then (19)-(23) (19) raplt raplt(1)-raplt(ne): radus of elements (20) icolor : color of ne elements lightness=0 or a means black or white satulation=0 means gray background color =10 white black = 1 white =10 gray ( 1- 9) blue =15 (11-19) magenta=45 (41-29) red =75 (71-39) yellow =105 (101-109) green =135 (131-139) cyan =165 (161-169) (21) nbond different kinds of bonds (<=10) (22) ie1, ie2, bmin, bmax, bcol, bwdt, klin ie1,ie2: element pair to be joined by a bond bmin: minimum length of a bond in angstrom bmax: maximum length of a bond in angstrom bcol: bond color bdwt: bond width klin: kind of lines 0: bold, 1: dashed 2: dotted ******bond length affected by isim****** repeat (22) nbond times (23) nsl,no1,no2 nsl: number of slices upward and downward along the projection axis no1-th to no2-th slices are calculated (default: all slices are calculated) **** if job = +-1 skip (24) **** (24) flnm5 file name of xyz file for the output of x,y,z coordinates of
This document was translated from LATEX by HEVEA.