COSMOS v7.655  COSMOSv7655
(AirShowerMC)
showParam.f
Go to the documentation of this file.
1  program showparam
2 ! to read namelist and write them
3 ! This may be used to get all the parameter list.
4 !
5  implicit none
6 #include "Zmanagerp.h"
7 ! testing creadParm
8  call cerrormsg(
9  * 'You can get Defaults by putting &Param &end', 1)
10  call creadparam(5)
11  call cwriteparam(errorout, 1)
12  end
13 #include "BlockData/cblkGene.h"
subroutine cerrormsg(msg, needrtn)
Definition: cerrorMsg.f:4
subroutine cwriteparam(io, force)
Definition: cwriteParam.f:4
subroutine creadparam(io)
Definition: creadParam.f:5
program showparam
Definition: showParam.f:1