Symbol Description Uses
igen_etaday 15


File Line number Procedure Code
./pkg/ecco/cost_gencost_sshv4.F 1224 COST_GENCOST_SSHV4 
     &                       gencost_dummy(igen_etaday) )
./pkg/ecco/cost_gencost_sshv4.F 191 COST_GENCOST_SSHV4 
      igen_etaday=0
./pkg/ecco/cost_gencost_sshv4.F 284 COST_GENCOST_SSHV4 
     &    igen_etaday=igen_tp
./pkg/ecco/cost_gencost_sshv4.F 293 COST_GENCOST_SSHV4 
     &    igen_etaday=igen_ers
./pkg/ecco/cost_gencost_sshv4.F 302 COST_GENCOST_SSHV4 
     &    igen_etaday=igen_gfo
./pkg/ecco/cost_gencost_sshv4.F 323 COST_GENCOST_SSHV4 
      ilps=ilnblnk( gencost_barfile(igen_etaday) )
./pkg/ecco/cost_gencost_sshv4.F 325 COST_GENCOST_SSHV4 
     &     gencost_barfile(igen_etaday)(1:ilps),'.',eccoiter
./pkg/ecco/cost_gencost_sshv4.F 540 COST_GENCOST_SSHV4 
     &                       gencost_dummy(igen_etaday) )
./pkg/ecco/cost_gencost_sshv4.F 80 COST_GENCOST_SSHV4 
      integer igen_etaday
./pkg/ecco/cost_gencost_sshv4.F 941 COST_GENCOST_SSHV4 
     &                       gencost_dummy(igen_etaday) )
./pkg/ecco/ecco_check.F 47 ECCO_CHECK 
      INTEGER igen_etaday, il, k2, ioUnit
./pkg/ecco/ecco_check.F 651 ECCO_CHECK 
      igen_etaday=0
./pkg/ecco/ecco_check.F 654 ECCO_CHECK 
     &       (using_gencost(k)) )  igen_etaday=k
./pkg/ecco/ecco_check.F 657 ECCO_CHECK 
      if ((igen_etaday.EQ.0).AND.(using_cost_altim)) then
./pkg/ecco/ecco_check.F 668 ECCO_CHECK 
     &  'etaday defined by gencost ',igen_etaday