X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fxdrfpdb%2Fsrc%2Fxdrf2x.F;h=be662e6ef1defbadba38529496307922205eacb0;hb=03796abc37f8aeff6e6c84e967993ce1b06f05a4;hp=b6e86cf360434632ea762a7b3c15d83045c03d15;hpb=84d8d7cefbfab8b46d1eef466a6bcf3a44ed257f;p=unres.git diff --git a/source/xdrfpdb/src/xdrf2x.F b/source/xdrfpdb/src/xdrf2x.F index b6e86cf..be662e6 100644 --- a/source/xdrfpdb/src/xdrf2x.F +++ b/source/xdrfpdb/src/xdrf2x.F @@ -3,7 +3,8 @@ integer ihpb(100),jhpb(100) character*80 arg,ctime_start /"0"/,ctime_end /"1000000000"/, & cfreq /"1"/ - integer time_start,time_end,freq +c integer time_start,time_end,freq + real time_start,time_end,freq call getarg(1,arg) if (iargc().eq.0) stop