Paper tape program part of a collection of paper tape programs used for input to CSIRAC.

This routine is available to be used in a larger program and does not run by itself. It calculates the square root of a fraction. It was widely used in many programs and routines.

This type of program calculates, for any multi-storied, rigid framed structure, the joint rotations, storey translations, and end moments in each member, for a number of columns and a number of stories. There are five such programs.

The collection includes the original University of Melbourne Computation Laboratory Paper Tape Library of tapes of subroutines and programs, and program and data tapes from staff and outside users.
Most of the paper tapes were 12-track punched paper tapes. 5 hole paper tapes were used primarily for data input and output rather than program input.
Each tape has a 'T' number. The Computation Laboratory Paper Tape Library consisted of tapes with a tape number less than 700. There were not 700 tapes but the number 700 was arbitrarily chosen to separate the Computation Laboratory Library tapes from user tapes.

Details of this tape:
04.2 Flexowriter Output 6 Routines Unrounded. Details in header of tape file.
For more documentation on the contents of this tape see folder 4.2, inventory id HT13511.8
From a technical point of view, this routine replaces the fraction in the A register by its square root, using a trial and error method. The error does not exceed 0.000002. For a negative argument, zero is returned. The ARSIN routine T113 used T050 as a routine.

More Information