Searched refs:kcaALagrange (Results 1 – 5 of 5) sorted by relevance
161 else if( fstrPARAM%contact_algo == kcaALagrange ) then
437 if( associated( fstrSOLID%contacts ) .and. fstrPARAM%contact_algo == kcaALagrange ) then
70 elseif( ctAlgo==kcaALagrange ) then
103 fstrPARAM%contact_algo = kcaALagrange
54 integer(kind=kint), parameter :: kcaALagrange = 2 variable