Changeset 2227 for LMDZ5/trunk/libf/phylmd/etat0_netcdf.F90

Timestamp:

Mar 12, 2015, 12:07:43 PM (10 years ago)

Author:

Laurent Fairhead

Message:

New ocean albedo.

To activate the new scheme, put iflag_albedo=1 in physiq.def

To activate chlorophyll concentration effect on albedo,
put ok_chlorophyll=y in def file

and download file named chlorophyll.nc
chlorophyll.nc has the same dimension as the model grid with 12 months data,
(i=lon, j=lat, L=1:12) and can be degraded from the original file of dimension
i=1:4320 , j=1:2160 , L=1:12
ada:/workgpfs/rech/psl/rpsl949/clima/chlor_seasonal_clim_seawifs.nc

For 96X96 resolution, chlorophyll.nc file is in
ada:/workgpfs/rech/psl/rpsl949/clima/chlorophyll.nc

19. Baek

File:

• LMDZ5/trunk/libf/phylmd/etat0_netcdf.F90 (modified) (1 diff)

LMDZ5/trunk/libf/phylmd/etat0_netcdf.F90

@@ -482 +482 @@
   falb1(:,is_oce) = 0.5;  falb1(:,is_sic) = 0.6
   falb2 = falb1
+!albedo SB >>>
+  falb_dir(:,is_ter,:)=0.08; falb_dir(:,is_lic,:)=0.6
+  falb_dir(:,is_oce,:)=0.5;  falb_dir(:,is_sic,:)=0.6
+!albedo SB <<<
   evap(:,:) = 0.
   DO i=1,nbsrf; qsolsrf(:,i)=150.; END DO