next up previous contents
Next: ps.pl Up: gen_image.pl Previous: gen_image

draw_block

# Arguments: *PSOUT     : Global open file descriptor used for PS output
#            $depth$     : Current logical depth
#            $item_size$ : # of element in one list item
#            $curr_item$ : Index of current item
#            $max_y$     : Max y coord. for entire PS graph
#            $file_loc$  : LOC for entire input file
#            $curr_x$    : Current x position (used for matching up lines)
#            $curr_y$    : Current y position (used for matching up lines)
#            @CCD_list  : List containing all needed #CCD info
#            
# Return Values: $curr_item$ : Current position in list
#                $curr_x$    : Current x position
#                $curr_y$    : Current y position
# Description: This recursive subroutine makes calls to the PS api in ps.pl,
#              thereby inserting all the nodes and lines besides the first and
#              last elbows (done by gen_image()).  It is recursive because
#              there is no easy way to know where to start drawing vertical
#              lines to connect to the bottom lines.  This subroutine solves
#              this problem by keeping track of the (x, y) position of what
#              was most recently drawn.  When the subroutine returns, it 
#              returns this value so that the next logical level up knows 
#              where to start drawing the vertical line.