  COMMAND WRITEPSCL
-----------------------------------------------------------------
    Purpose: print out particle-scale
      Usage: WRITEPSCL(<particleID>[,<start>])
   Examples: writepscl(1)
             writepscl(5,212)
