& gencost_outputlevel,
gencost_outputlevel(k)= 0
& gencost_outputlevel(k)
& gencost_outputlevel(k), gencost_name(k),
if (gencost_outputlevel(kgen).GT.0) then
if (gencost_outputlevel(igen_gmsl).GT.0) then
if (gencost_outputlevel(igen_lsc).GT.0) then
if (gencost_outputlevel(igen_tp).GT.0) then
if (gencost_outputlevel(igen_ers).GT.0) then
if (gencost_outputlevel(igen_gfo).GT.0) then
if (gencost_outputlevel(igen_mdt).GT.0) then
& gencost_flag, gencost_outputlevel,
integer gencost_outputlevel(NGENCOST)