Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- % REFFERENCIA
- referencia('Chevrolet Aveo', '4', 1.5, '120').
- referencia('Chevrolet Spark', '5', 1.0, '110').
- referencia('Mazda2', '5', 1.5, '150').
- referencia('Renault Twingo', '3', 1.2, '130').
- referencia('Renault Logan', '4', 1.4,'130').
- referencia('Hyundai I10', '5', 1.0, '110').
- referencia('Hyundai I35', '4', 1.8, '160').
- % VEHICULO
- vehiculo('Chevrolet Aveo','KDT-256', '2011').
- vehiculo('Mazda 2', 'CBF-198', '2010').
- vehiculo('Renault Twingo', 'BNP-298', '2009').
- vehiculo('Renault Logan', 'WNT-389', '2011').
- vehiculo('Chevrolet Spark', 'FNP-456', '2008').
- vehiculo('Renault Twingo', 'RAT-819', '2008').
- vehiculo('Hyundai I10', 'MWT-456', '2012').
- vehiculo('Hyundai I35', 'NPR-765', '2010').
- vehiculo('Chevrolet Aveo', 'CTW-226', '2010').
- vehiculo('Chevrolet Spark', 'NWX-568', '2007').
- % PROPIETARIO
- propietario('Alberto Ramirez', '94400256', '300-7744256').
- propietario('Marina Duque', '92000198', '312-7654198').
- propietario('Alberto Renteria', '93000298', '317-6789298').
- propietario('Juan Fernandez', '94100389', '320-6923389').
- propietario('Valentina Yepes', '91000456', '318-2008456').
- propietario('Victor Ruano', '93100819', '301-5567819').
- propietario('Carmen Idrobo', '94500456', '300-2315456').
- propietario('Fernando Arteaga', '91900765', '316-9087765').
- propietario('German Luna', '92000226', '320-4650226').
- propietario('Roberto Garcia', '93600568', '311-1022568').
- % REVISION
- revision('CBF-198', '24-Oct-2011', 'P').
- revision('CBF-198', '10-Feb-2012', 'N').
- revision('BNP-298', '4-Dic-2010', 'C').
- revision('KDT-256', '18-Oct-2011', 'C').
- revision('RAT-819', '9-Agost-2008', 'P').
- revision('FNP-456', '10-Mayo-2009', 'P').
- revision('FNP-456', '29-Abril-2010', 'N').
- revision('WNT-389', '2-Feb-2012', 'P').
- revision('MWT-456', '10-Abril-2012', 'N').
- revision('NPR-765', '25-Nov-2010', 'C').
- revision('MWT-456', '20-Sept-2012', 'P').
- revision('CTW-226', '5-Ene-2011', 'N').
- revision('CTW-226', '10-Nov-2011', 'N').
- revision('NWX-568', '5-Marz-2008', 'P').
- revision('NWX-568', '10-Feb-2009', 'C').
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement