5,6c5,9
< #include "list.h"
< #include "defs.h"
---
> 
> #include "road.h"
> 
> //#include "list.h"
> //#include "defs.h"
11,12c14,15
< create_road_class(CLASS *class, AU *road_au, int ToAge, double road_area, int Offset, int ReEntryLag, int period) {
< 	CLASS	*newclass;
---
> create_road_class(TIMBER_CLASS *timber_class, AU *road_au, int ToAge, double road_area, int Offset, int ReEntryLag, int period) {
> 	TIMBER_CLASS	*newclass;
20c23
< 		new_age = class->age+Offset;
---
> 		new_age = timber_class->age+Offset;
26c29
< 	newclass = (CLASS *)init_make_class(class->parent_zone,
---
> 	newclass = (TIMBER_CLASS *)init_make_class(timber_class->parent_zone,
28c31
< 		class->parent_block,
---
> 		timber_class->parent_block,
32,33c35,36
< 		class->class_type,
< 		class->reversion_age,
---
> 		timber_class->class_type,
> 		timber_class->reversion_age,
36c39
< 		class->staticgrouplist,
---
> 		timber_class->staticgrouplist,
133c136
< road_class(CLASS *class, double harvest, int period) {
---
> road_class(TIMBER_CLASS *timber_class, double harvest, int period) {
140,141c143,144
< 	if (class->roaded==TRUE) return(harvest);
< 	if (class->parent_au->RoadRec==NULL) return(harvest);
---
> 	if (timber_class->roaded==TRUE) return(harvest);
> 	if (timber_class->parent_au->RoadRec==NULL) return(harvest);
143c146
< 	au = (AU *)func_find_au(class->parent_zone, class->parent_au->RoadRec->au);
---
> 	au = (AU *)func_find_au(timber_class->parent_zone, timber_class->parent_au->RoadRec->au);
145c148
< 		printf("\n\nERROR: road_class(): Could not find specified road AU(%s)\n\n", class->parent_au->RoadRec->au);
---
> 		printf("\n\nERROR: road_class(): Could not find specified road AU(%s)\n\n", timber_class->parent_au->RoadRec->au);
148c151
< 	RoadArea = harvest*(class->parent_au->RoadRec->pc/100.0);
---
> 	RoadArea = harvest*(timber_class->parent_au->RoadRec->pc/100.0);
151,152c154,155
< 	new_age = class->parent_au->RoadRec->ToAge;
< 	create_road_class(class, au, new_age, RoadArea, class->parent_au->RoadRec->Offset, class->parent_au->RoadRec->reentry, period);
---
> 	new_age = timber_class->parent_au->RoadRec->ToAge;
> 	create_road_class(timber_class, au, new_age, RoadArea, timber_class->parent_au->RoadRec->Offset, timber_class->parent_au->RoadRec->reentry, period);
154,157c157,160
< 	class->area -= RoadArea;
< 	class->parent_zone->area -= RoadArea;
< 	class->parent_zone->axslist = (LIST_PTR *)list_reset(class->parent_zone->axslist);
< 	axs = (AXSDEF *)list_next(class->parent_zone->axslist);
---
> 	timber_class->area -= RoadArea;
> 	timber_class->parent_zone->area -= RoadArea;
> 	timber_class->parent_zone->axslist = (LIST_PTR *)list_reset(timber_class->parent_zone->axslist);
> 	axs = (AXSDEF *)list_next(timber_class->parent_zone->axslist);
162c165
< 			for ( x=class->age-class->width+1; x<=class->age; ++x ) {
---
> 			for ( x=timber_class->age-timber_class->width+1; x<=timber_class->age; ++x ) {
164c167
< 				axs->AgeArea[y] -= (RoadArea/class->width);
---
> 				axs->AgeArea[y] -= (RoadArea/timber_class->width);
167c170
< 		axs = (AXSDEF *)list_next(class->parent_zone->axslist);
---
> 		axs = (AXSDEF *)list_next(timber_class->parent_zone->axslist);
169,170c172,173
< 	class->floatgrouplist = (LIST_PTR *)list_reset(class->floatgrouplist);
< 	group = (GROUP *)list_next(class->floatgrouplist);
---
> 	timber_class->floatgrouplist = (LIST_PTR *)list_reset(timber_class->floatgrouplist);
> 	group = (GROUP *)list_next(timber_class->floatgrouplist);
179c182
< 				for ( x=class->age-class->width+1; x<=class->age; ++x ) {
---
> 				for ( x=timber_class->age-timber_class->width+1; x<=timber_class->age; ++x ) {
181c184
< 					axs->AgeArea[y] -= (RoadArea/class->width);
---
> 					axs->AgeArea[y] -= (RoadArea/timber_class->width);
186c189
< 		group = (GROUP *)list_next(class->floatgrouplist);
---
> 		group = (GROUP *)list_next(timber_class->floatgrouplist);
188,189c191,192
< 	class->staticgrouplist = (LIST_PTR *)list_reset(class->staticgrouplist);
< 	group = (GROUP *)list_next(class->staticgrouplist);
---
> 	timber_class->staticgrouplist = (LIST_PTR *)list_reset(timber_class->staticgrouplist);
> 	group = (GROUP *)list_next(timber_class->staticgrouplist);
197c200
< 				for ( x=class->age-class->width+1; x<=class->age; ++x ) {
---
> 				for ( x=timber_class->age-timber_class->width+1; x<=timber_class->age; ++x ) {
199c202
< 					axs->AgeArea[y] -= (RoadArea/class->width);
---
> 					axs->AgeArea[y] -= (RoadArea/timber_class->width);
204c207
< 		group = (GROUP *)list_next(class->staticgrouplist);
---
> 		group = (GROUP *)list_next(timber_class->staticgrouplist);