/****************************************/ /* Define L2A-25 data structure. */ /****************************************/ STRUCTURE /CFLAGS/ BYTE mainlobeEdge BYTE sidelobeRange(3) END STRUCTURE STRUCTURE /CLUTTER_FLAGS/ RECORD /CFLAGS/ clutFlag(CLUTFLAG_TBL_SIZE) END STRUCTURE STRUCTURE /L2A_25_SWATHDATA/ REAL*8 scanTime REAL*4 geolocation(2,49) RECORD /PR_SCAN_STATUS/ scanStatus RECORD /NAVIGATION/ navigate REAL*4 scLocalZenith(49) INTEGER*2 rain_scale(80,49) REAL*4 rain(80,49) BYTE reliab(80,49) INTEGER*2 correctZFactor_scale(80,49) REAL*4 correctZFactor(80,49) INTEGER*2 attenParmNode(5,49) *legacy INTEGER*2 attenParmAlpha_scale(5,49) REAL*4 attenParmAlpha(5,49) INTEGER*2 attenParmBeta_scale(49) REAL*4 attenParmBeta(49) INTEGER*2 ZRParmNode(5,49) *legacy INTEGER*2 parmNode(5,49) REAL*4 precipWaterParmA(5,49) REAL*4 precipWaterParmB(5,49) INTEGER*2 ZRParmA_scale(5,49) REAL*4 ZRParmA(5,49) INTEGER*2 ZRParmB_scale(5,49) REAL*4 ZRParmB(5,49) REAL*4 zmmax(49) INTEGER*2 rainFlag(49) INTEGER*2 rangeBinNum(7,49) *legacy INTEGER*2 rainAve_scale(2,49) REAL*4 rainAve(2,49) INTEGER*2 precipWaterSum_scale(49) REAL*4 precipWaterSum(49) INTEGER*2 weightW_scale(49) REAL*4 weightW(49) *legacy REAL*4 epsilon_0(49) INTEGER*2 method(49) REAL*4 epsilon(49) REAL*4 zeta(2,49) REAL*4 zeta_mn(2,49) REAL*4 zeta_sd(2,49) REAL*4 xi(2,49) *legacy REAL*4 sigmaZero(49) REAL*4 freezH(49) INTEGER*2 thickThPIZ(49) *legacy REAL*4 nubfCorrectFactor(2,49) INTEGER*2 qualityFlag(49) REAL*4 nearSurfRain(49) REAL*4 nearSurfZ(49) REAL*4 pia2a25(49) *legacy REAL*4 e_SurfRain(49) REAL*4 pia(3,49) REAL*4 errorRain(49) REAL*4 errorZ(49) REAL*4 spare(2,49) INTEGER*2 rainType(49) END STRUCTURE