Searched refs:DLOAD_ngrp_amp (Results 1 – 4 of 4) sorted by relevance
41 jj_n_amp = fstrSOLID%DLOAD_ngrp_amp(ig0)
130 write(*,*) 'DLOAD_ngrp_amp ',s%DLOAD_ngrp_amp
2242 call fstr_expand_integer_array ( P%SOLID%DLOAD_ngrp_amp, old_size, new_size )2261 P%SOLID%DLOAD_ngrp_amp(old_size+i) = amp_id
273 integer(kind=kint), pointer :: DLOAD_ngrp_amp (:) component658 nullify( S%DLOAD_ngrp_amp )