Sorry,
I read the mentioned discussion and modified myself. However, I got the error below:
The executable explicit.exe aborted with system error code 1073741819. Please check the .dat, .msg, and .sta files for error messages if the files exist.
Here is the code:
subroutine vusdfld(
c...