Home
last modified time | relevance | path

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

/dports/science/mcstas-comps/mcstas-comps-2.5-src/libs/cif2hkl/
H A Dcif2hkl.F9023562 integer, parameter :: ilat_norm=12, ilat_fact=ilat_norm*4 local
23604 ty=mod(tt(2)-tt1(2)+ilat_fact,ilat_norm)
23605 tz=mod(tt(3)-tt1(3)+ilat_fact,ilat_norm)
23636 ty=mod(tt(2)-tt1(2)+ilat_fact,ilat_norm)
23889 m2(:,4)=mod(m2(:,4)+ilat_fact,ilat_norm)
24149 tx=mod(tx,ilat_norm)
24150 ty=mod(ty,ilat_norm)
24151 tz=mod(tz,ilat_norm)
24195 tx=mod(tx+ilat_fact,ilat_norm)
24196 ty=mod(ty+ilat_fact,ilat_norm)
[all …]