libsim
Versione7.2.6
alchimia
alchimia_copy
c_e_fn
compile_sl
fn_display
fn_init
fnregister
fnv_delete
fnv_display
fnv_display_byorder
init_fn
makev
oracle
register_copy
shoppinglist
sl_display
vfnv_display
◆
vfnv_display()
subroutine alchimia::vfnv_display
(
type(
fndsv
), dimension(:), intent(in)
vfnv
)
private
Display vector function objects on screen.
Parametri
[in]
vfnv
vector 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
.