This archive contains answers to questions sent to Unidata support through mid-2025. Note that the archive is no longer being updated. We provide the archive for reference; many of the answers presented here remain technically correct, even if somewhat outdated. For the most up-to-date information on the use of NSF Unidata software and data services, please consult the Software Documentation first.
Scott and Steve, NCF has started broadcasting some of the sounder products over NOAAPORT. Also, CIMMS is making some of these products available as AREA files. To view these GINI products from NOAAPORT: 1) The imgi2gm.f file needs to be updated with the ichan values being used (currently 16, 17, 18 and 27). Using the imtype where imtype = 2**(ichan - 1) gives: <snip> IF ( ichan .eq. 1 ) THEN imtype = 1 ELSE IF ( ichan .eq. 2 ) THEN imtype = 2 ELSE IF ( ichan .eq. 3 ) THEN imtype = 4 ELSE IF ( ichan .eq. 4 ) THEN imtype = 8 ELSE IF ( ichan .eq. 5 ) THEN imtype = 16 ELSE IF ( ichan .eq. 16) THEN imtype = 2**15 ELSE IF ( ichan .eq. 17) THEN imtype = 2**16 ELSE IF ( ichan .eq. 18) THEN imtype = 2**17 ELSE IF ( ichan .eq. 27) THEN imtype = 2**26 ELSE iret = -4 RETURN END IF The above reflects those products currently being broadcast. I will go back to the interface control document and define all the values for tables 4.3A and 4.3b. For either GINI or AREA: 2) The imgtype.tbl file is currently formatted for IMGTYP NUMBER having a column width of 6. Large numbers will not fit in this space. Either the table format would have to be modified, or the imrtbl.f routine will have to be modified. To maintain compatibility with the tables currently available, I chose to modify imrtbl.f to recognize a number of the format x**y in the table for pos 52-57 if the CALL ST_NUMB ( line (52:57), jptyp, ier ) call fails: [121]gempak on flip --> diff imrtbl.f ~gempak/GEMPAK6/gempak/source/gemlib/im 24d23 < C* Chiz/Unidata 5/00 Add check for ** in table jptyp * 63,75d61 < C < C* if not a standard number, check to see if it contains ** < C < if(ier.ne.0) then < ipos = INDEX( line (52:57),'**') < if(ipos.gt.1) then < CALL ST_NUMB ( line (52:(52+ipos-2)),ip1,ier1) < CALL ST_NUMB ( line ((52+ipos+1):57),ip2,ier2) < if((ier1.eq.0).and.(ier2.eq.0)) < + jptyp = ip1 ** ip2 < endif < endif < C 3) imgtyp.tbl entries for sounder products will look like: ! SOUNDER Products ! ! GINI products currently being broadcast as GOES-8 images (70) ! Note, IMGTYP NUMBER is 2**(CHANNEL - 1) SOUNDER LI 0 255 70 2**15 1 GRAY SOUNDER PW 0 255 70 2**16 1 GRAY SOUNDER SFC_SKIN 0 255 70 2**17 1 GRAY SOUNDER CTP 0 255 70 2**26 1 GRAY ! ! CIMMS products use GOES-10 sounder (75) ID SOUNDER CTP 0 255 75 2**26 1 GRAY SOUNDER PW 0 255 75 2**27 1 snd_pwin.tbl SOUNDER LI 0 255 75 2**28 1 snd_li.tbl SOUNDER CAPE 0 255 75 2**29 1 GRAY SOUNDER OZONE 0 255 75 2**30 1 GRAY SOUNDER SST 0 255 70 2**30 1 ssmi_mpc.tbl 4) Unfortunately, the NOAAPORT GINI SOUNDER images are being broadcast with Lo1 currently as 141 degrees instead of -141. Tom Yoksas is planning on contacting PRC and NESDIS regarding this error. Steve Chiswell Unidata User Support