Names Default To Here( 1 );

// set dt1 to current data table, and set appropriate columns, and get number of rows
dt1 = current data table();
nr1 = n rows(); // number of rows

coachcol1=column(dt1,1); // column where coach name resides
yearcol1=column(dt1,2); // column where year resides
schoolcol1=column(dt1,3); // column where school name resides
wincol1=column(dt1,10); // column where number of wins for this year resides
losscol1=column(dt1,11); // column where number of losses for this year resides


// Create new data table where results will be stored
dt2 = new table();
dt2 << New Column( "School");
dt2 << New Column( "Year");
dt2 << New Column( "Coach");
dt2 << New Column( "W/L");


// counter for current row being analyzed in dt1
nr=1;

// loop through each row of dt1
for (i=1, i<=nr1, i++,
		(
			// get the names of school, year, coach, and nwins and nlosses from dt1
			school1=schoolcol1[i];
			yr=dt1:yearcol1[i];
			nwins=wincol1[i];
			nlosses=losscol1[i];
			coach1=coachcol1[i];

			// for each win, create a new row in dt2 and record proper info
			for (j=1, j<=nwins, j++,
					(
						dt2 << add rows(1, at end);
						column(dt2,1)[nr]=school1;
						column(dt2,2)[nr]=yr;
						column(dt2,3)[nr]=coach1;
						column(dt2,4)[nr]="W";
						nr++;
					)
				);

			// for each loss, create a new row in dt2 and record proper info
			for (j=1, j<=nlosses, j++,
				(
					dt2 << add rows(1, at end);
					column(dt2,1)[nr]=school1;
					column(dt2,2)[nr]=yr;
					column(dt2,3)[nr]=coach1;
					column(dt2,4)[nr]="L";
					nr++;
				)
		);
	)
);
