!copyright (C) 2001  MSC-RPN COMM  %%%RPNPHY%%%
*
*
      REAL critmask, critsnow, critwater, critexture
      REAL minicedp, critlac
*
      COMMON /SURFACEPAR/ critmask, critsnow, critwater, critexture,
     1                    minicedp, critlac
*
*