add missing usings

db4
Doug Coleman 2009-10-10 14:04:22 -05:00
parent f6ef60ba12
commit 50d4eb27bf
1 changed files with 1 additions and 1 deletions

View File

@ -129,7 +129,7 @@ ARTICLE: "tuple-inheritance-example" "Tuple subclassing example"
} }
"Rectangles and parallelograms use the same algorithm for computing the area, whereas they use different algorithms for computing perimiter. Also, rectangles and parallelograms both have " { $snippet "width" } " and " { $snippet "height" } " slots. We can exploit this with subclassing:" "Rectangles and parallelograms use the same algorithm for computing the area, whereas they use different algorithms for computing perimiter. Also, rectangles and parallelograms both have " { $snippet "width" } " and " { $snippet "height" } " slots. We can exploit this with subclassing:"
{ $code { $code
"USING: math.constants math.functions ;" "USING: accessors kernel math math.constants math.functions ;"
"GENERIC: area ( shape -- n )" "GENERIC: area ( shape -- n )"
"GENERIC: perimiter ( shape -- n )" "GENERIC: perimiter ( shape -- n )"
"" ""