|
|
|
@ -33,7 +33,7 @@ |
|
|
|
include 'accumhist.f' |
|
|
|
real(dp):: integ,integ_err,r,er |
|
|
|
logical:: dryrun |
|
|
|
logical, parameter :: newIntegration = .false. |
|
|
|
logical, parameter :: newIntegration = .true. |
|
|
|
integer:: itmxplots |
|
|
|
character*256 inputfile,workdir |
|
|
|
common/dryrun/dryrun |
|
|
|
|