C$$$ MAIN PROGRAM DOCUMENTATION BLOCK C . . . . C MAIN PROGRAM: PREPFITS ADDS OBS/ANALYSIS INCREMENTS TO PREPBUFR FILE C PRGMMR: JANJIC ORG: NP22 DATE: 99-01-20 C C ABSTRACT: PROGRAM ADDS OBS/ANALYSIS INCREMENTS TO PREPBUFR FILE C C PROGRAM HISTORY LOG: C 0?-??-?? J. WOOLLEN? C C USAGE: MAIN PROGRAM C C INPUT FILES: NONE (SEE SUBROUTINE INIT) C UNIT5 Records of model name GRIB file / name index file C UNIT11 LEVCAT namelist input file. Example: C &LEVCAT C NUMLEV=39 C FIT=.T.,.T.,.F.,.F.,.T.,.T.,.T.,.F.,.F.,.F. C &END C UNIT20 INPUT BUFR file created by editbufr C UNIT21 GRIB file for forecast C UNIT22 PREPFITS BUFR table file C UNIT23 GRIB index file for forecast C C OUTPUT FILES: NONE (SEE SUBROUTINE CHKOUT) C 51 Output BUFR file with obs & forecast profiles C C SUBPROGRAMS CALLED: C ALCAPE C GETPROF C RADDATE C UFBINT C ABORT C BAOPEN, BAOPENR C CLOSBF C DATEDB C DATELEN C GETBAK C GETFCT C OPENBF C OPENMB C UBFINT C UFBXY3 C WRITSB C IREADMG C IREADSB C C EXIT STATES: C COND = 1 - NORMAL EXIT C C ATTRIBUTES: C LANGUAGE: FORTRAN 90 C MACHINE : IBM SP C C$$$