libsim  Versione 7.2.4

◆ dbametadata_equal()

elemental logical function dballe_class::dbametadata_equal ( class(dbametadata), intent(in)  this,
class(dbametadata), intent(in)  that 
)
private

equal operator for dbametadata

Parametri
[in]thisfirst element
[in]thatsecond element

Definizione alla linea 2199 del file dballe_class.F03.

2200 if (present(anavarlist)) then
2201  dbafilter_init%anavarlist=anavarlist
2202 else if (nopreserve) then
2203  dbafilter_init%anavarlist=cmiss
2204 end if
2205 
2206 if (present(anastarvarlist)) then
2207  dbafilter_init%anastarvarlist=anastarvarlist
2208 else if (nopreserve) then
2209  dbafilter_init%anastarvarlist=cmiss
2210 end if
2211 
2212 if (present(vars)) then
2213  if (allocated(vars%dcv)) then
2214  allocate(dbafilter_init%vars%dcv(size(vars%dcv)))
2215  do i =1,size(vars%dcv)

Generated with Doxygen.