Thermal conductivity of Ar

hello.
This is the of code thermal conductivity of Ar.
I want to integration.I put s=1,p=1000 and d=1000 but the values of fix command in ar file is negative but it must be positive.(see the files that I send)
please help me.
Thank you.

code and result.rar (20.3 KB)