common/aicefm/AICEF(imOCN,jmOCN),AICEM(imOCN,jmOCN) & ,depthml(imOCN,jmOCN) common/ocn4atm/sstz(JMOCN),saltz(jmOCN),sstxy(imOCN,jmOCN), & saltxy(imOCN,jmOCN) common/seaice4atm/ricez(JMOCN),dicez(JMOCN),tice1z(jmOCN), & tice2z(JMOCN),snowiz(JMOCN), & ricexy(imOCN,jmOCN),dicexy(imOCN,jmOCN),tice1xy(imOCN,jmOCN), & tice2xy(imOCN,jmOCN),snowixy(imOCN,jmOCN) ! For ML ocean common/mlocn4atm/tocea2z(JMOCN),tocea3z(jmOCN), & z1ozon(JMOCN),z2ozon(jmOCN)