\' Gambas class file
Public Sub _new()
End
Public Sub Form_Open()
Dim usoMotores As New Aplicacion
Print "Uso motor comun:"
usoMotores.usarMotorComun()
Print "------------------------------"
Print "Uso motor Economico:"
usoMotores.usarMotorEconomico
Print "------------------------------"
Print "Uso motor Electrico:"
usoMotores.usarMotorElectrico
Print "------------------------------"
End