THIS IS THE CODE THAT WRITES MOS FORECASTS AND CONSTANT DATA IN GRIB 0 IPRT --0 FOR NONE,1 FOR VARIABLE INFO, 2 FOR VARIABLE INFO & STATION DATA VALUES 12 ICYL --MODEL CYCLE MDR BGRID --GRID LAND/WATER MASK IS ON 5000 IOVLND--MAX # OF OVERLAND POINTS ON BGRID .010 CUT --CUTOFF USED FOR LAND/WATER DESIGNATION 1 NEW --1 FOR NEW 4-CHARACTER CALL LETTERS, 0 FOR NOT ******** THIS IS THE INITIALIZATION FOR THE PDS ********************* 28 PDS(1) --NUMBER OF BYTES IN PDS 2 PDS(2) --PARAMETER TABLE VERSION # 07 PDS(3) --ID OF ORIGINATING CENTER NCEP=7 96 PDS(4) --MODEL NUMBER AVN=96, MRF=94, ETA=84, NGM=39 14 PDS(24)--SUBCENTER MDL=14, TDL=11 10 NCEP DATE FILE 99 48 RANDOM ACCESS FILE - MOS FORECASTS 45 RANDOM ACCESS FILE - CONSTANT FILE 99 35 GRID INFO FILE 99 36 LAND/WATER MASK FILE 99 66 GRIB OUTPUT FILE 99 26 STATION LIST 27 STATION DICTIONARY 99 25 VARIABLE LIST 99 29 VARIABLE CONSTANT FILE - MOS2000ID.TBL 99 EOF