Home
last modified time | relevance | path

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

/dports/science/mcstas-comps/mcstas-comps-2.5-src/libs/cif2hkl/
H A Dcif2hkl.F9044021 Newmol=molecule
44082 if (Newmol%is_connect) then
44169 if (Newmol%is_connect) then
44282 Newmolecule=Newmol
44284 Molecule=Newmol
44342 do i=2,Newmol%natoms
44347 u1=Newmol%I_coor(:,2)
44349 u2=Newmol%I_coor(:,3)
44358 do i=2,Newmol%natoms
44368 Newmolecule=Newmol
[all …]