defrule not working

[bilal murat]

Hi all,

I am trying to learn CLIPS by creating a small project, to do risk assessment in safety science. 

I have written ten rules using defrule function. But the below function does not work. I have also checked the user guides but found nothing.

I need your help.

Thanks,

(defrule hesaplamaGiris1

(declare (salience 115))

(Risk.1 ?riskg1)

(olasılıkG.1 ?olasılıkg1)

 

=>

            (if (>= (* ?riskg1 ?olasılıkg1) 10)

            then

            (printout t "   **** ****************************************************    " crlf)

            (printout t "**** Yaşlı veya hamile çalışanların KTD kazaları için Risk Öncelik Skoru  : " (round (* ?riskg1 ?olasılıkg1)) "dur." crlf)

            (printout t "**** Güvenli iş yeri ortamı sağlamak için aşağıda belirtilen tedbirleri alınız   : " crlf)

            (printout t "**** Yaşlı çalışanların yük taşıma oranın azaltılmalıdır " crlf)

            (printout t "**** KTD üzerine eğitim verilmelidir." crlf)

            (printout t "**** Yük taşıma ve telaşlı işlerden muaf tutulmalıdır. “ crlf)

(printout t "**** Yaşlı çalışanların engel ve tehlikeleri daha iyi görebilmeleri için iyi aydınlatma sağlanmalıdır." crlf)

(printout t "**** Yükleme ve indirme işlemlerinin yapıldığı alanlar dışında çalıştırılmalıdır" crlf)

            (printout t "   **** ****************************************************    " crlf)

            else

            (printout t "   **** ****************************************************    " crlf)

 

            (printout t "**** Yaşlı veya hamile çalışanların KTD kazaları için Risk Öncelik Skoru  : " (round (* ?riskg1 ?olasılıkg1)) " 'dur." crlf)

            (printout t "**** Mevcut Durumu Koruyunuz." crlf )

(printout t "   **** ****************************************************    " crlf)))

[CLIPS Support]

You used a curly quotation mark on the following line rather than a straight one:

(printout t "**** Yük taşıma ve telaşlı işlerden muaf tutulmalıdır. “ crlf)