libsim  Versione 7.2.1

◆ fnv_display_byorder()

subroutine alchimia::fnv_display_byorder ( type(fndsv), intent(in)  fnv,
integer, intent(in)  order 
)
private

Display vector function objects on screen selected by order.

Parametri
[in]fnvvector function object to display
[in]orderlevel for recursice search of functions

Definizione alla linea 504 del file alchimia.F03.

505 
506 ! delete only on the main call
507 if (.not. optio_log(recurse)) then
508  CALL l4f_log(l4f_debug, "shoppinglist: main call (delete and register)")
509 
510  call delete(myvfn)
511  call fnregister(myvfn)
512  order=0
513  newbout(:size(mybout))=mybout
514 
515  if (optio_log(copy)) call register_copy(vfntmp,mybout)
516 
517 else

Generated with Doxygen.