Searched refs:kel361IC (Results 1 – 6 of 6) sorted by relevance
119 else if( fstrSOLID%sections(isect)%elemopt361 == kel361IC ) then ! incompatible element
174 else if( fstrSOLID%sections(isect)%elemopt361 == kel361IC ) then ! incompatible element
395 else if( fstrSOLID%sections(isect)%elemopt361 == kel361IC ) then
417 else if( fstrSOLID%sections(isect)%elemopt361 == kel361IC ) then
70 integer(kind=kint), parameter :: kel361IC = 3 variable
379 fstrSOLID%sections(i)%elemopt361 = kel361IC382 fstrSOLID%sections(i)%elemopt361 = kel361IC1058 if( fstrSOLID%sections(isect)%elemopt361==kel361IC ) then