libsim Versione 7.1.11

◆ dbametaanddatab_extrude()

subroutine dbametaanddatab_extrude ( class(dbametaanddatab), intent(in)  metaanddatab,
type(dbasession), intent(in)  session 
)
private

put data on DSN

Parametri
[in]sessiondballe session

Definizione alla linea 3246 del file dballe_class.F03.

3247
3248 if (allocated(filter%starvars%dcv)) then
3249 lstarvars=.true.
3250 allocate(starvars%dcv(size(filter%starvars%dcv)))
3251 do i =1,size(filter%starvars%dcv)
3252 allocate(starvars%dcv(i)%dat,source=filter%starvars%dcv(i)%dat)
3253 end do
3254 end if
3255
3256 end if
3257
3258 end if
3259
3260 if (lvars) then
3261

Generated with Doxygen.