Symbol Description Uses
fnametheta 3



File Line number Procedure Code
./pkg/ecco/cost_obcs_ageos.F 143 COST_OBCS_AGEOS
        write(fnametheta(1:80),'(2a,i10.10)')
./pkg/ecco/cost_obcs_ageos.F 193 COST_OBCS_AGEOS
        call ACTIVE_READ_XYZ( fnametheta, tbar, irec,
./pkg/ecco/cost_obcs_ageos.F 94 COST_OBCS_AGEOS
      character*(80) fnametheta