libsim  Versione 7.1.6

◆ alchimia_copy()

subroutine alchimia::alchimia_copy ( character(len=10), dimension(:), intent(in)  mybin,
character(len=10), dimension(:), intent(in)  mybout,
character(len=10), dimension(:), intent(in)  bin,
character(len=10), dimension(:), intent(in)  bout,
real, dimension(:,:), intent(in)  in,
real, dimension(:,:), intent(out)  out 
)
private
Parametri
[in]mybinvector table B WMO input in user's data
[in]myboutvector table B WMO output in user's data
[in]binvector table B WMO input used by function
[in]boutvector table B WMO output used by function
[in]ininput data array
[out]outoutput data array

Definizione alla linea 325 del file alchimia.F03.

326 type(fndsv),intent(in) :: vfnv(:)
327 integer :: i
328 
329 print *,">>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>"
330 do i = 1, size(vfnv)
331  print*,">> Function tree number:",i
332  call display(vfnv(i))
333 end do
334 print *,"<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<"

Generated with Doxygen.