Describe PICINPT here.

      SUBROUTINE PICINPT(PICNM,Z0,KK,DN,ESZ) 



----
categorySubroutine