libsim Versione 7.1.11

◆ dbadata_getd()

subroutine dbadata_getd ( class(dbadata), intent(in)  data,
doubleprecision, intent(out)  value 
)
private

return double precision value

Parametri
[in]datadata object to be decoded
[out]valuereturned value

Definizione alla linea 917 del file dballe_class.F03.

918ier = idba_set(session%sehandle,"lon",getilon(ana%vol7d_ana%coord))
919if (c_e(ana%vol7d_ana%ident)) then
920 ier = idba_set(session%sehandle,"ident",ana%vol7d_ana%ident)
921 ier = idba_set(session%sehandle,"mobile",1)
922else
923 ier = idba_set(session%sehandle,"ident",cmiss)
924 ier = idba_set(session%sehandle,"mobile",imiss)
925end if
926

Generated with Doxygen.