libsim  Versione7.2.3

◆ vfnv_display()

subroutine alchimia::vfnv_display ( type(fndsv), dimension(:), intent(in)  vfnv)
private

Display vector function objects on screen.

Parametri
[in]vfnvvector function object to display

Definizione alla linea 524 del file alchimia.F03.

524  !print*,"order:",myvfn%fnds(i)%order, order
525  if (myvfn%fnds(i)%order == order) then
526  do k=1,size(myvfn%fnds(i)%bin(:))
527  newbout(firsttrue(.not. c_e(newbout)))=myvfn%fnds(i)%bin(k)
528  end do
529  end if
530  end do
531 
532 end if

Generated with Doxygen.