# Metview Macro

# **************************** LICENSE START ***********************************
#
# Copyright 2012 ECMWF. This software is distributed under the terms
# of the Apache License version 2.0. In applying this license, ECMWF does not
# waive the privileges and immunities granted to it by virtue of its status as
# an Intergovernmental Organization or submit itself to any jurisdiction.
#
# ***************************** LICENSE END ************************************

# retrieve the climatological monthly field

function clim(level,param,date,area,tronc)
	cl=retrieve(
			type	:	"cl",
			stream	:	"mo",
			param	:	param,
			levelist:	level,
			date	:	string(date,'mmm'),
			area	:	area,
			resol	:	tronc,
			grid	:	[2.5,2.5]
			)
	return cl
end clim
