; Copyright (C) 2014 The HDF Group
; All rights reserved.
;
; This script tests IDL on new NASA HDF4 products.
 
file_args = COMMAND_LINE_ARGS()
PRINT, file_args(0)
;file_id=HDF_OPEN(file,/READ) 
file = file_args(0)
sd_id=HDF_SD_START(file,/READ) 
HDF_SD_FILEINFO,sd_id,nr_dataset,nr_attributes 
HDF_SD_END,sd_id 
;HDF_CLOSE,file_id 
PRINT, '# of SDS datasets=', nr_dataset
PRINT, '# of SDS attributes=',nr_attributes
EXIT