1. This is Dataplot program file     LEIGH3.DP
2. DNA Analysis
3.
4. Date--January 19, 1994
5.
6. -----START POINT-----
7.
8DIMENSION 50 VARIABLES
9DEVICE 2 POSTSCRIPT
10LET STRING MARK = LEIGH3.DP
11.
12SKIP 25
13READ LEIGHFAC.DAT X1 TO X10
14READ LEIGHLAB.DAT LAB
15READ LEIGHP3A.DAT Y1 TO Y14
16LET X11 = LAB
17LET AREA = X3*X4
18LET AREA2 = 1 FOR I = 1 1 33
19LET AREA2 = 2 SUBSET AREA >= 177
20LET AREA2 = CODE2 AREA
21LET X12 = AREA2
22LET X3 = CODE2 X3
23LET X4 = CODE2 X4
24LET X7 = CODE2 X7
25.
26X3LABEL AUTOMATIC
27XLIMITS 1 12
28CHAR BL ALL; LINES SOLID ALL
29DEX MEAN PLOT Y1 X1 TO X12
30XLIMITS
31ER
32.
33LET STRING S1 = CELL LINE
34LET STRING S2 = SIZING PROGRAM
35LET STRING S3 = GEL LENGTH
36LET STRING S4 = GEL WIDTH
37LET STRING S5 = AGAR OSMOLALITY
38LET STRING S6 = ETHIDIUM
39LET STRING S7 = VOLTAGE
40LET STRING S8 = MEMBRANE
41LET STRING S9 = SOURCE
42LET STRING S10 = LABEL
43LET STRING S11 = LAB
44LET STRING S12 = AREA
45.
46LET STRING RESP1 = 1
47LET STRING RESP2 = 2
48LET STRING RESP3 = 3
49LET STRING RESP4 = 4
50LET STRING RESP5 = 5
51LET STRING RESP6 = 6
52LET STRING RESP7 = 7
53LET STRING RESP8 = 8
54LET STRING RESP9 = 9
55LET STRING RESP10 = 10
56LET STRING RESP11 = 11
57LET STRING RESP12 = 12
58.
59LOOP FOR K = 1 1 12
60LET STRING RESP = RESP^K
61LET X = X^K
62CALL LEIGH3SU.DP
63END LOOP
64