C--------------------------------------------------------------------
C    Common areas for SD
C	Dale E. Coy			Sept/Oct 1986 (V4.0A)
C	Los Alamos National Laboratory
C--------------------------------------------------------------------

	Block Data SD_Common

	Include 'SD_Common.Dat'
	Include 'SD_SMG.Dat'

	Data Expdev   /.FALSE./
	Data Do_Tree  /.FALSE./
	Data Do_Dir   /.FALSE./
	Data Do_Stack /.FALSE./
	Data Do_ID    /.FALSE./
	Data Do_DM    /.FALSE./
	Data Have_Printer_Data  /.FALSE./
	Data SDC_Spare_Logical  /.FALSE./

	Data Devlen /0/
	Data Dirlen /0/
	Data SLen   /0/
	Data PLen   /0/
	Data PNLen  /0/
	Data TNLen  /0/
	Data UNLen  /0/
	Data ChgLen  /0/
	Data CmdLen  /0/
	Data CDevLen /0/
	Data CDirLen /0/
	Data EnvLen  /0/
	Data WLen    /0/
	Data RLen    /0/
	Data TLen    /0/

	Data Stack_Depth /20/      ! How many SD_Slots

	Data Value  /0/

	Data SD_SLOTn /'SD_SLOTnn'/
	Data SD__n    /'SD__nn'/
	Data Rest     /' '/
	Data SD_Tran  /SD_Trans/
                    
	Data Have_Display     /8*.FALSE./
	Data Have_Big_Display /8*.FALSE./
	Data SD_Highlight     /.TRUE./
	Data SD_VT300	      /.TRUE./
	Data SD_Star_Wide     /.FALSE./
	Data SD_Spare_Logical /.FALSE./
	
	Data Name_Length      /8*0/

	Data Current_Display_Length /24/
	Data Last_Line /1/
	Data Current_Level /1/
	Data B_Width /8*999999/

	Data Max_Top  /1/
	Data Max_Left /1/
	Data Highest_Level /1/
	Data Top_Line /1/
	Data Left_Col /1/
	Data Shift_Point /2/
	
	Data Channel /-9999/

	End

