libsim  Versione 7.1.6

◆ dbadata_equal()

elemental logical function dballe_class::dbadata_equal ( class(dbadata), intent(in)  this,
class(dbadata), intent(in)  that 
)
private

equal operator for dbadata

Parametri
[in]thisfirst element
[in]thatsecond element

Definizione alla linea 849 del file dballe_class.F03.

850 class(dbalevel), intent(out) :: level
851 type(dbasession), intent(in) :: session
852 integer :: ier
853 
854 ier = idba_enqlevel(session%sehandle,&
855  level%level1, level%l1, level%level2, level%l2)
856 
857 end subroutine dbalevel_enq
858 

Generated with Doxygen.