% Sctipt to test the Generic Aircraft Engine
clear
disp(' ')
disp('Start here')
disp(' ')
ploton=1
Trpm=2300
Tmp=22
Talt=4000
ploton=1
MaxMP=0

[Temp,press,rho,Hgeopvector]=atmosphere4(Talt,0)
BHP=Gengine(Trpm,Tmp,Talt,Temp,MaxMP,ploton)
