fill_in_vertex_location

//***************************************************************************
//
// Date Created:	November 29, 1995
//
//***************************************************************************
//
// Changes:
// Date Changed:
//
//***************************************************************************
//
// This propagation pattern fills in the Location of a Vertex object.
// It takes in one argument, the Vertex's Location.
//
//***************************************************************************


(@
#include <iostream.h>
#include <strstream.h>
// #include "tclexec.h"
@)

*operation* void fill_in_vertex_location(char* Location)


*traverse* 
	*from* Vertex
	*through* ->*,position, *
	*to* Coordinates

*wrapper* Coordinates
	(@	 this->set_coords(new DemString(Location)); 	@)