& ' using_cost_altim[T=mdt,F=no]: ',using_cost_altim
if (using_cost_altim) then
IF (using_cost_altim) THEN
using_cost_altim=.TRUE.
using_cost_altim=.FALSE.
& using_cost_altim,
IF (using_cost_altim) call COST_GENCOST_SSHV4( mythid )
logical using_cost_altim
& .OR.(using_mdt) ) using_cost_altim = .TRUE.
if ((igen_etaday.EQ.0).AND.(using_cost_altim)) then
using_cost_altim = .FALSE.