)rv comment

comment ***************************************************************
comment * remark	invoke documentary 2 column mode
define docmode
! )rv
! width 35 30 
! between gaps = 5
! box 1 = 1 35
! go
! )l2
comment ***************************************************************

comment ***************************************************************
comment * remark	invoke normal 1 column text mode
define normtxt
! )rv
! width 70
! go
! )l2
comment ***************************************************************


comment ***************************************************************
comment * remark	move to the second column to the right side
comment * 		of the page while in docmode
define rcol
! )c2
! )l2i+5
comment ***************************************************************

comment ***************************************************************
comment * remark	move to the second column to the left side
comment * 		of the page while in docmode
define lcol
! )rc1
! )l2
comment ***************************************************************
)rv comment test fmt
set b = ' )b!par.1 '
keypunch
go
!normtxt
this is a very normal text, which should be represented in
normal text mode initiated by the FMT-macro !51normtxt.
Now, it should be possible to switch to the other, so called
documentary mode. In this mode the page is divided into 
2 columns and a box is drawn around the text in the first column.
This mode will now be invoced by calling the FMT-macro !51docmode.
!docmode
!b(1)
)a
        the program text
        a=a*b
        c=s+2
        etc.
        etc.
        .
        . .
        . 
)
!b(1)

!rcol
This is to describe the program to the left. 
this program contains 2 statements and otherwise just
garbage. 
the program has been entered in as-is-mode.
I do not know if this second
column is now longer than the box to the left.
we will see.
if the text in the second column to the right
uses more lines than the box to the left,
the text following the box in the left column should be
pushed downwards the page.

!lcol
because this text should now be written to the left
under the box.
Now will come something new:
the ultimate switch to normal text mode.

!normtxt
Is this text now written in normal text mode as it should?
