COMMON/CMPBND/B(ZIMXP,2,2),FB(ZIMXP,2) cmpbnd.h.1