libsim  Versione7.2.6

◆ vol7d_varvect_indexvect()

integer function, dimension(size(search)) vol7d_varvect_class::vol7d_varvect_indexvect ( type(vol7d_varvect), intent(in)  this,
type(vol7d_var), dimension(:), intent(in)  search,
logical, intent(in), optional  back,
character(len=*), dimension(:), intent(inout)  TYPE 
)

Return the index of first or last element of this equal to search.

Parametri
[in]thisobject to search in
[in]searchwhat to search
[in]backif .TRUE. search from the end
[in,out]typetype of vector found ("d","r","i","b","c")

Definizione alla linea 270 del file vol7d_varvect_class.f90.

270 TYPE(vol7d_varvect),intent(in) :: this
271 type(vol7d_var),INTENT(in) :: search(:)
272 LOGICAL,INTENT(in),OPTIONAL :: back
273 character(len=*),intent(inout) :: type(:)
274 INTEGER :: index_(SIZE(search))
275 
276 integer :: i
277 
278 do i =1 ,size(search)
279  index_(i) = vol7d_varvect_index(this, search(i), back=back, type=type(i))
280 end do
281 

Generated with Doxygen.