libsim Versione 7.2.1

◆ dbadata_c_e_r()

logical function dbadata_c_e_r ( class(dbadata), intent(in)  data)
private

test missing value

Parametri
[in]datadata object to be tested

Definizione alla linea 898 del file dballe_class.F03.

899INTEGER(kind=int_l),INTENT(in),OPTIONAL :: ilon
900INTEGER(kind=int_l),INTENT(in),OPTIONAL :: ilat
901
902if (present(coord))then
903 CALL init(dbaana_init%vol7d_ana, ilon=getilon(coord%geo_coord), ilat=getilat(coord%geo_coord), ident=ident)
904else
905 CALL init(dbaana_init%vol7d_ana, lon=lon, lat=lat, ilon=ilon, ilat=ilat, ident=ident)
906end if
907

Generated with Doxygen.