libsim Versione 7.2.6

◆ fn_display()

subroutine fn_display ( type(fnds), intent(in) fn)

Display function objects on screen.

Parametri
[in]fnfunction object to display

Definizione alla linea 459 del file alchimia.F03.

460 CALL l4f_log(l4f_debug, "oracle: other register "// trim(maybefn%fnds(i)%name))
461 call fnregister(myvfn,maybefn%fnds(i),order)
462 do k=1,count(c_e(maybefn%fnds(i)%bin))
463 tmpbin(firsttrue(.not. c_e(tmpbin)))=maybefn%fnds(i)%bin(k)
464 end do
465 end if
466 end do
467
468 stat = .true.
469
470else
471
472 stat=oracle(newbin,mybout,vfn,myvfn,.true.)
473

Generated with Doxygen.