libsim Versione 7.2.0
|
◆ fnv_display_byorder()
Display vector function objects on screen selected by order.
Definizione alla linea 494 del file alchimia.F03. 495
496type(fndsv) :: vfntmp
497integer :: i,j,k
498logical :: somefoundout
499integer,save :: order
500character(len=10) :: newbout(nmaxb)
501
502stat=.true.
503newbout=cmiss
504vfntmp=vfn
505
506! delete only on the main call
507if (.not. optio_log(recurse)) then
|