! *****************************COPYRIGHT*******************************
! (c) < name of rights owner, e.g. University of xxx > < Year produced, e.g. 2008 >. All rights reserved.
!
! This routine has been licensed to the other JULES partners for use
! and distribution under the JULES collaboration agreement, subject
! to the terms and conditions set out therein.
!
! [Met Office Ref SC0237] 
! *****************************COPYRIGHT*******************************