libsim Versione 7.2.4
|
◆ dbadatetime_enq()
query parameters from dballe API
Definizione alla linea 1964 del file dballe_class.F03. 1965!!$ dbafilter_equal_dbadata = this%vars%dcv(i)%dat == that
1966!!$ if (dbafilter_equal_dbadata) continue
1967!!$ end do
1968!!$else
1969!!$ dbafilter_equal_dbadata=.false.
1970!!$end if
1971!!$
1972!!$end function dbafilter_equal_dbadata
1973
1974
1977elemental logical function dbadcv_equal_dbadata(this,that)
1978
1979class(dbadcv), intent(in) :: this
1980class(dbadata), intent(in) :: that
1981
1982integer :: i
1983
1984!non compila:
1985!dbafilter_equal_dbadata = any(this%vars%dcv(:)%dat == that)
|