libsim Versione 7.2.4
|
◆ dbametadata_enq()
query parameters from dballe API
Definizione alla linea 2088 del file dballe_class.F03. 2089!!$ allocate(dbafilter_init%anavars%dcv(i)%dat,source=filter%anavars%dcv(i)%dat)
2090!!$ end do
2091!!$ end if
2092!!$
2093!!$ if (allocated(filter%anastarvars%dcv)) then
2094!!$ if (allocated(dbafilter_init%anastarvars%dcv)) deallocate(dbafilter_init%anastarvars%dcv)
2095!!$ allocate(dbafilter_init%anastarvars%dcv(size(filter%anastarvars%dcv)))
2096!!$ do i =1,size(filter%anastarvars%dcv)
2097!!$ allocate(dbafilter_init%anastarvars%dcv(i)%dat,source=filter%anastarvars%dcv(i)%dat)
|