libsim Versione 7.1.11
|
◆ dbadata_equal()
equal operator for dbadata
Definizione alla linea 849 del file dballe_class.F03. 850class(dbalevel), intent(out) :: level
851type(dbasession), intent(in) :: session
852integer :: ier
853
854ier = idba_enqlevel(session%sehandle,&
855 level%level1, level%l1, level%level2, level%l2)
856
857end subroutine dbalevel_enq
858
|