earlybrowserreborn - Rev 1

Subversion Repositories:
Rev:
/*
 *  From McIDAS Reference Manual
 *     Introduction - pg 21
 *     Table 1, UD-14 9/88,
 *
 * Given the "SS Code" (word three of the area directory)
 *   return a string describing the sensor source.
 *
 */

char *
mc_sensor(sscode)
int sscode ;
{
        switch (sscode) {
        case 0 : return("Non-Image Derived Data") ;
        case 1 : return("Test patterns") ;
        case 2 : return("Graphics") ;
        case 3 : return("Miscellaneous") ;
        case 4 : return("PDUS Meteosat Visible") ;
        case 5 : return("PDUS Meteosat Infrared") ;
        case 6 : return("PDUS Meteosat Water Vapor") ;
        case 7 : return("Radar") ;
        case 8 : return("Miscellaneous Aircraft Data (MAMS)") ;
        case 12 : return("GMS Visible") ;
        case 13 : return("GMS Infrared") ;
        case 14 : return("ATS 6 Visible") ;
        case 15 : return("ATS 6 Infrared") ;
        case 16 : return("SMS-1 Visible") ;
        case 17 : return("SMS-1 Infrared") ;
        case 18 : return("SMS-2 Visible") ;
        case 19 : return("SMS-2 Infrared") ;
        case 20 : return("GOES-1 Visible") ;
        case 21 : return("GOES-1 Infrared") ;
        case 22 : return("GOES-2 Visible") ;
        case 23 : return("GOES-2 Infrared") ;
        case 24 : return("GOES-3 Visible") ;
        case 25 : return("GOES-3 Infrared") ;
        case 26 : return("GOES-4 Visible (VAS)") ;
        case 27 : return("GOES-4 Infrared and Water Vapor (VAS)") ;
        case 28 : return("GOES-5 Visible (VAS)") ;
        case 29 : return("GOES-5 Infrared and Water Vapor (VAS)") ;
        case 30 : return("GOES-6 Visible") ;
        case 31 : return("GOES-6 Infrared") ;
        case 32 : return("GOES-Visible, Block 1 Auxiliary Data") ;
        case 33 : return("GOES-7 Infrared") ;
        case 34 :
        case 36 :
        case 37 :
        case 38 :
        case 39 :
        case 40 : return("NOAA Series Satellites") ;
        case 41 : return("TIROS-N") ;
        case 42 : return("NOAA-6") ;
        case 43 : return("NOAA-7") ;
        case 44 : return("NOAA-8") ;
        case 45 : return("NOAA-9") ;
        case 46 : return("Venus") ;
        case 47 : return("Voyager 1") ;
        case 48 : return("Voyager 2") ;
        case 50 : return("Hubble St.") ;
        case 60 : return("NOAA-10") ;
        case 61 : return("NOAA-11") ;
        case 70 : return("GOES-I (IMAGER)") ;
        case 71 : return("GOES-I (SOUNDER)") ;
        case 72 : return("GOES-J (IMAGER)") ;
        case 73 : return("GOES-J (SOUNDER)") ;
        case 74 : return("GOES-K (IMAGER)") ;
        case 75 : return("GOES-K (SOUNDER)") ;
        case 76 : return("GOES-L (IMAGER)") ;
        case 77 : return("GOES-L (SOUNDER)") ;
        case 78 : return("GOES-M (IMAGER)") ;
        case 79 : return("GOES-M (SOUNDER)") ;
        case 80 : return("ERBE") ;
        case 90 : return("RAW METEOSAT") ;
        }
        return("Unknown") ;
}