win(header(pc,fprule_model_factory,'Transport rules',nil),70,100,400,500,conts(`~M~JIF   the distance IS more than 1000 miles~M~JTHEN the best form of transport IS an aeroplane .~M~J~M~JIF   the distance IS from 100 to 1000 miles AND~M~J     the amount you will be prepared to pay IS plenty~M~JTHEN the best form of transport IS an aeroplane .~M~J~M~JIF   the distance IS from 100 to 1000 miles AND~M~J     the amount you will be prepared to pay IS middling~M~JTHEN the best form of transport IS a train .~M~J~M~JIF   the distance IS from 100 to 1000 miles AND~M~J     the amount you will be prepared to pay IS very small~M~JTHEN the best form of transport IS a bus .~M~J~M~JIF   the distance IS from 10 to 100 miles AND~M~J     a car IS available~M~JTHEN the best form of transport IS a car .~M~J~M~JIF   the distance IS from 10 to 100 miles AND~M~J     a car IS not available~M~JTHEN the best form of transport IS a bus .~M~J~M~JIF   the distance IS from 5 to 10 miles~M~JTHEN the best form of transport IS a bus .~M~J~M~JIF   the distance IS less than 5 miles~M~JTHEN the best form of transport IS a bicycle .~M~J`,'System',2,16)).
