Searched refs:SPRING_ngrp_GRPID (Results 1 – 3 of 3) sorted by relevance
27 grpid = fstrSOLID%SPRING_ngrp_GRPID(ig0)60 grpid = fstrSOLID%SPRING_ngrp_GRPID(ig0)
289 integer(kind=kint), pointer :: SPRING_ngrp_GRPID (:) =>null() component
863 fstrSOLID%step_ctrl(1)%Load(n) = fstrSOLID%SPRING_ngrp_GRPID(i)2358 call fstr_expand_integer_array ( P%SOLID%SPRING_ngrp_GRPID, old_size, new_size )2376 P%SOLID%SPRING_ngrp_GRPID(old_size+1:new_size) = gid