pro verify_rss_ssts ;test read routines of RSS daily SST OI (fusion) files (MW and MW_IR) ;comment out commands below that you do not need ;read RSS MW Optimal Interpolated SST Files ;select and alter the path below ; ;file_name='your_drive\your_directory\mw.fusion.2004.140.v04.0 read_rss_mw_sst, file_name, sst, error, mask print, file_name ; print the subset of data that appears in verify.txt file print, 'sst:' print, sst(769:774,473:477),format='(6f11.2)' print, 'error:' print, error(769:774,473:477),format='(6f11.2)' ;read RSS Microwave-IR OI (fusion) SST Files ;select and alter the path below ;file_name='your_drive\your_directory\mw_ir.fusion.2003.029.v04.0' read_rss_mwir_sst, file_name, sst, error, mask print, file_name ; print the subset of data that appears in verify.txt file print, 'sst' print, sst(969:974,673:677),format='(6f11.2)' print, 'error' print, error(969:974,673:677),format='(6f11.2)' end