libsim  Versione 7.1.7

◆ dbametaanddatab_extrude()

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