Addition through most of page 48

Inclusion of subroutine {put_out, calculation}