202 
APPENDIX F: WBASIC COMPUTER PROGRAM TO SORT FIELD DATA 
00010 !PURPOSE: CREATE MATRICES FOR RECALL, SORT, SCALING, & QUES 
00020 !AND TO CALCULATE RANK ORDER CORRELATIONS PER SUBJECT FOR THESE 
00030 
00040 CASES = 80 
00050 
00060 !DECLARE DIMENSIONS 
00070 
00080 OPTION BASE 1 
00090 DIM RR(20) 
00100 DIM RECALL(2,25,25) 
00110 DIM RECALLG(2,25,25; 
00120 DIM SRECALL(25,25) 
00130 DIM SRECALLG(25,25) 
00140 DIM RFREQ(2, 135) 
00150 DIM SRFREQ( 135) 
00160 DIM RCARD(25) 
00170 DIM CARD(2,25,25) 
00180 DIM SCARD(25,25) 
00180 DIM RS(24) 
00200 DIM SCALE(2,24,24) 
00210 DIM RQ( 10) 
00220 DIM QUES(2,25,25) 
00230 DIM QFREQ(2, 135) 
00240 DIM SQFM( 135) 
00250 DIM SQFREQ( 135) 
00260 DIM CRFREQ(135) 
00270 DIM ERFREQ( 135) 
00280 DIM CQFREQ( 135) 
00290 DIM EQFREQ( 135) 
00300 DIM CRECALL(25,25) 
00310 DIM ERECALL(25,25) 
00320 DIM CRECALLG(25,25) 
00330 DIM ERECALLG(25,25) 
00340 DIM CCARD(25,25) 
00350 DIM ECARD(25,25) 
00360 DIM CSCALE(24,24) 
00370 DIM ESCALE(24,24) 
00390 
00400 
00420 
00430 MAT RR = (0) 
00440 MAT RECALL = (0) 
D0450 MAT RECALLG = (0) 
D0460 MAT RFREQ = (0) 
00470 MAT SRFREQ = (0) 
00480 MAT RECFREQ = (0) 
00490 MAT RCARD = (0) 
00500 MAT CARD = (0) 
00510 MAT SCALE = (0) 
00520 MAT RS = (0) 
00530 MAT RQ = (0) 
00540 MAT QFREQ = (0) 
00550 MAT SQFM = (0) 
00560- MAT QUES = (0) 
00570 MAT CRECFREQ=(0) 
00580 MAT ERECFREQ=(0) 
00590 MAT CQFREQ=(0) 
00600 MAT EQFREQ=(0) 
00610 MAT SQFREQ=(0) 
00620 MAT CRFREQ=(0) 
LET IN = 0