Home
last modified time | relevance | path

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

/dports/science/siesta/siesta-4.1.5/Src/
H A Dbasis_specs.f664 integer nrcs_zetas local
818 nrcs_zetas = fdf_bnvalues(pline)
819 if (nrcs_zetas < 1) then
823 if (i <= nrcs_zetas) then
826 s%rc(i) = s%rc(nrcs_zetas)
856 nrcs_zetas = fdf_bnreals(pline)
857 if (nrcs_zetas < 1) then
861 if (i <= nrcs_zetas) then
864 s%lambda(i) = s%lambda(nrcs_zetas)