COG366 Demo Page

Following is a demo of the bone.pl program.

?- createNewPatient.
Enter the name of the patient
|: bob.

bob is now a patient. How old are they? 
|: 20.

true.

?- diagnose(bob).
Refer the patient to an orthopedic oncologist and perform a biopsy.
What were the results of the biopsy?
|: chondrosarcoma.

What was the grade of the cancer?|: low_grade_and_intracompartmental.

true .

?- treatment(bob).
apply one of the following treatment methods : 1.)Intralesional excision + surgical adjuvant 2.) Wide excision, if resectable 3.)Consider RT is unresectable
Afterwards, the patient should undergo a physical examination as well as radiographs of the primary site as clinically indicated every 6-12 months for 2 years, then yearly as appropriate. Do this with the chest as well. If a recurrence occurs perform a wide excision is reectable or RT if unresectable.
After performing treatment on the patient, what were the results?
|: positive_margins.
Consider RT or consider re-resection to achieve negative surgical margins
true .

?- createNewPatient.
Enter the name of the patient
|: steve.

steve is now a patient. How old are they? 
|: 35.

true.

?- diagnose(steve).
Refer the patient to an orthopedic oncologist and perform a biopsy.
What were the results of the biopsy?
|: chondrosarcoma.

What was the grade of the cancer?|: high_grade.

true .

?- treatment(steve).
Perform a wide excision if resectable or consider RT if borderline resectable or unrectable. For surveillance: Perform a physical exam, perform radiographs of primary site and/or cross-sectional imaging MRI or CT as clinically indicated, chest imaging every 3-6 months (may include a CT at least every 6 months for 5 years, then yearly for a minimum of 10 years), reasses function at every follow-up visit.
If a recurrence occured, what type of occurence was it?local.
Perform a wide excision if resectable or RT if unresectable.
Did the tumor display positive or negative margins?
|: positive_margins.
Consider RT or consider re-resection to achieve negative surgical margins
true .

?- reviseSymptom(steve, positive_margins).
What is the revised symptom?
|: negative_margins.

true.


?- observe(steve).
Continue to observe the patient.
true.