 # Delivered to the U.S. Government in Accordance with Contract FA8650-10-C-7080.
 #
 # EXPORT CONTROLLED
 # ECCN#   EAR99  
 # Warning:  This document contains technical data which is controlled under the
 # Bureau of Industry & Security’s Export Administration Regulations and may not be
 # exported or re-exported without authorization by the Bureau of Industry & Security.
 # Diversion contrary to US law is prohibited.
 #
 # (c) 2011 United Technologies Corp.
 # Developed with the sponsorship of the Defense Advanced Research Projects Agency (DARPA).
 #
 # Permission is hereby granted, free of charge, to any person obtaining a copy of this data,
 # including any software or models in source or binary form, as well as any drawings, 
 # specifications, and documentation (collectively "the Data"), to deal in the Data without 
 # restriction, including without limitation the rights to use, copy, modify, merge, publish,
 # distribute, sublicense, and/or sell copies of the Data, and to permit persons to whom the Data
 # is furnished to do so, subject to the following conditions:
 #  
 # The above copyright notice and this permission notice shall be included in all copies or
 # substantial portions of the Data.
 #  
 # THE DATA IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR IMPLIED, INCLUDING
 # BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
 # NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS, SPONSORS, DEVELOPERS, CONTRIBUTORS, OR
 # COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
 # OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE DATA OR THE
 # USE OR OTHER DEALINGS IN THE DATA.

###### Fan Nozzle:
param N_fan_nozzle$;
param m_ref$;								# Reference Mass Flow From Yu Long (kg/s)
param cost_ref$;							# Reference Cost from Yu Long (Million USD)
var A_fan_nozzle$>=0.1;
var To$ >=1;
var V_fan >=50;
var cost$>=0; 

subject to conTo$: To$ = To% - N_fan_nozzle$*(To%- To%*(Pac/Po%)^((gam%-1)/gam%))  ;
subject to conV_Fan$: V_fan = sqrt(2*cp%*(To%-To$));

subject to aconstraint_fan_nozzle$: A_fan_nozzle$ = (ma_core*bpr)/(V_fan*Pac/(R*To$));

subject to conchangeTo$: To$<=To%;
subject to conchangePac$: Po%/Pac>=1.01;
subject to conchoke$: Po%/Pac<=1.89;

subject to concost$: cost$=(ma_core*bpr/m_ref$)^a*cost_ref$;			# Calculation of Development cost based on Yu Long's information;
