libsim Versione 7.1.11
|
◆ fn_display()
Display function objects on screen.
Definizione alla linea 465 del file alchimia.F03. 466 end do
467
468 stat = .true.
469
470else
471
472 stat=oracle(newbin,mybout,vfn,myvfn,.true.)
473
474end if
475
476! delete on exit only on the main call
477if (.not. optio_log(recurse)) then
478 call delete(maybefn)
479 call delete(usefullfn)
|