VASP-dos - psocar.f -