! File:   ONCDEB.BEG
!
!    This work was supported by the Advanced Research
!    Projects Agency of the Office of the Secretary of
!    Defense (F44620-73-C-0074) and is monitored by the
!    Air Force Office of Scientific Research.

!
!
!	THIS IS THE BEGIN FILE FOR ONCE AND DEBUG
!
!
! THIS IS FOR DEBUGGING AND TREE PRINTING

STRUCTURE OBS[I]=[I](.I+.OBS-MAXOPERATOR)<0,36>;

STRUCTURE TREEPRNT[I]=[I](.TREEPRNT+.I)<0,36>;

EXTERNAL TREEPRNT OPPRNT;
EXTERNAL OBS OBPRNT;