CALL SEQSCALE
(prob, gscale, domain, level <*>, IGUESS=iguess <*>, TSCALE=tscale <*>, EPS=eps <*>, DEN=den ) ;
The SEQSCALE subroutine computes estimates of scales associated with discrete sequential tests.
See the entry for the SEQ subroutine for details.