! $Id$ ! !*********************************************************************** program run ! use Cdata use Param_IO ! implicit none ! call read_runpars() ! endprogram run !***********************************************************************