Home
last modified time | relevance | path

Searched defs:Allocate_Coordination_Type (Results 1 – 1 of 1) sorted by relevance

/dports/science/mcstas-comps/mcstas-comps-2.5-src/libs/cif2hkl/
H A Dcif2hkl.F9040597 Subroutine Allocate_Coordination_Type(nasu,numops,dmax,Max_Coor) subroutine
40599 integer, intent(in) :: nasu
40600 integer, intent(in) :: numops
40601 real(kind=cp), intent(in) :: dmax
40602 integer, intent(out) :: Max_Coor
40605 real(kind=cp), parameter :: r_atom=0.4_cp !Radius of a typical atom