#include "tlpp-core.th"
Class Point
private data x as numeric
private data y as numeric
public method New(x as numeric, y as numeric)
public method getX() as numeric
public method getY() as numeric
EndClass
Class Circle From Point
private data r as numeric
public method New(x as numeric, y as numeric, r as numeric)
public method draw()
EndClass |