|
◆ vfnv_display()
subroutine vfnv_display |
( |
type(fndsv), dimension(:), intent(in) |
vfnv | ) |
|
Display vector function objects on screen.
- Parametri
-
[in] | vfnv | vector function object to display |
Definizione alla linea 519 del file alchimia.F03.
523 do i=1, count(c_e(myvfn%fnds(:)))
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)
|