5  REM PROGRAM DEVELOPED BY DICK PHILLIPS
10 PRINT CHR$(26)
20 PRINT "        CLARK Y AIRFOIL"
30 PRINT
40 PRINT "WING RIB DIMENSION PLOTTER"
50 PRINT
60 PRINT "INDEX CHORD OF WING RIB DESIRED"
62 PRINT: DASH$=STRING$(80,45)
70 INPUT "CHORD DESIRED IN INCHES (DECIMAL FRACTIONS ONLY)";C
72 LPRINT DASH$
75 LPRINT CHR$(29)CHR$(31)"DIMENSIONS FOR CLARK 'Y' @";C; "INCH CHORD"
80 LPRINT CHR$(30)
85 LPRINT DASH$
90 LPRINT "STATION",, "OFFSET","UPPER","LOWER"
95 LPRINT DASH$
100 LPRINT "STATION 0 (LE) = ", C*0, C*.035, C*.035
110 LPRINT "STATION 1.25  = ", C*.0125, C*.0545, C*.0193
120 LPRINT "STATION 2.5   = ", C*.025, C*.065, C*.0147
130 LPRINT "STATION 5.0   = ", C*.05, C*.079, C*.0093
140 LPRINT "STATION 7.5   = ", C*.075,C*.0885,C*.0063
150 LPRINT "STATION 10    = ",C*.1  ,C*.096, C*.0042
160 LPRINT "STATION 15    = ", C*.15, C*.1068, C*.0015
170 LPRINT "STATION 20    = ", C*.2, C*.1136, C*.0003
180 LPRINT "STATION 30    = ", C*.3, C*.117
190 LPRINT "STATION 40    = ", C*.4, C*.114
200 LPRINT "STATION 50    = ", C*.5  ,C*.1052
210 LPRINT "STATION 60    = ", C*.6, C*.0915
220 LPRINT "STATION 70    = ",C*.7  ,C*.0735
230 LPRINT "STATION 80    = ", C*.8, C*.0522
240 LPRINT "STATION 90    = ", C*.9, C*.028
250 LPRINT "STATION 95    = ", C*.95, C*.0149
260 LPRINT "STATION 100   = ", C*1, C*.0012
270 LPRINT CHR$(12)
280 END