! -*-f90-*- ! Initialisation parameters ! &init_pars cvsid='$Id$', /