libsim Versione 7.2.6
|
◆ register_copy()
Register the copy function to be able to copy input variables to output if requested.
Definizione alla linea 307 del file alchimia.F03. 308integer,intent(in) :: order !< level for recursice search of functions
309
310integer :: i
311
312print *,"-------------------------------------------------"
313print *, "Here the function tree for order: ",order
314do i = count(c_e(fnv%fnds)),1,-1
315 if (fnv%fnds(i)%order == order ) then
316 call display(fnv%fnds(i))
|