
    COMMON /ACMPRE/ &
    TPREC &
    ,ACSNOW(IDIM1:IDIM2,JDIM1:JDIM2),ACSNOM(IDIM1:IDIM2,JDIM1:JDIM2) &
    ,SSROFF(IDIM1:IDIM2,JDIM1:JDIM2),BGROFF(IDIM1:IDIM2,JDIM1:JDIM2)
