Find the following block of code in CASINO/src/ppots.f90
Code: Select all
open(io_pp,file=psp_filename,status='old',iostat=ierr)
if(ierr/=0)call errstop('READ_PPOTS','Error opening '//trim(psp_filename)&
&//' file.')
Code: Select all
if(ierr/=0)write(my_node+400,*)'ierr=',ierr ; call flush(my_node+400)
In fact, as you are up against a 48h time limit, you need to find a shorter run which exhibits the same error.
To do this set max_cpu_time = 10 min in the input file, then use 'runqmc --auto-continue' - this will force a restart after 10 minutes.
If you encounter the error, one or more files called e.g. fort.4xx should appear, containing something like 'ierr=123'. Could you let me know what the actual value of 123 is?
M.