libsim Versione 7.1.11

◆ alchimia_copy()

subroutine 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.

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

Generated with Doxygen.