include file: albedo.h 1 c c $Id: albedo.h,v 1.1 1998/04/01 07:14:17 ccm Exp $ c $Author: ccm $ c real snws ! Snow albedo for 0.2-0.7 micro-meters real snwl ! Snow albedo for 0.7-5.0 micro-meters real sices ! Sea ice albedo for 0.2-0.7 micro-meters real sicel ! Sea ice albedo for 0.7-5.0 micro-meters parameter (snws = 0.95) parameter (snwl = 0.70) parameter (sices = 0.70) parameter (sicel = 0.50) C C Slab ocean model mods C real sicsns ! Sea-ice snow albedo for 0.2-0.7 micro-meters real sicsnl ! Sea-ice snow albedo for 0.7-5.0 micro-meters parameter (sicsns = 0.84) parameter (sicsnl = 0.60) C real sicsmn ! min Sea-ice albedo for 0.2-0.7 micro-meters real siclmn ! min Sea-ice albedo for 0.7-5.0 micro-meters parameter (sicsmn = 0.50) parameter (siclmn = 0.26) C