Net2/usr/src/usr.bin/pascal/tstpx/out/t17.out

                                 *
                                             *
                                                     *
                                                          *
                                                          *
                                                       *
                                                 *
                                         *
                                 *
                          *
                     *
                  *
                  *
                    *
                        *
                            *
                                 *
                                     *
                                        *
                                          *
                                          *
                                         *
                                       *
                                    *
                                 *
                              *
                             *
                            *
                           *
                            *
                              *
                               *
                                 *

166 statements executed in 0.12 seconds cpu time.