Symbol Description Uses
kLocOut 35



File Line number Procedure Code
./verification/OpenAD/code_ad_singlelayer/cost_test.F 48 COST_TEST
         kLocOut =  1
./verification/OpenAD/code_ad_singlelayer/cost_test.F 52 COST_TEST
         kLocOut =  1
./verification/global_ocean.cs32x15/code_ad/cost_test.F 47 COST_TEST
         kLocOut =  1
./verification/global_ocean.cs32x15/code_ad/cost_test.F 51 COST_TEST
         kLocOut =  1
./verification/global_ocean.cs32x15/code_ad/cost_test.F 73 COST_TEST
     &              'COST    ',ig,jg,kLocOut,' TILE ',i,j,bi,bj
./verification/global_ocean.cs32x15/code_ad/cost_test.F 74 COST_TEST
               objf_test(bi,bj) = theta(i,j,kLocOut,bi,bj)
./verification/global_ocean.cs32x15/code_ad/cost_test.F 76 COST_TEST
               print *, 'ph-cost ', ig, jg, kLocOut,
./verification/global_ocean.cs32x15/code_ad/cost_test.F 77 COST_TEST
     &              theta(i,j,kLocOut,bi,bj)
./verification/hs94.1x64x5/code_ad/cost_test.F 45 COST_TEST
      kLocOut =  1
./verification/hs94.1x64x5/code_ad/cost_test.F 69 COST_TEST
     &              theta(i,j,kLocOut,bi,bj)
./verification/hs94.1x64x5/code_ad/cost_test.F 72 COST_TEST
     &              ig,jg,kLocOut,' TILE ',i,j,bi,bj
./verification/hs94.1x64x5/code_oad/cost_test.F 45 COST_TEST
      kLocOut =  1
./verification/hs94.1x64x5/code_oad/cost_test.F 69 COST_TEST
     &              theta(i,j,kLocOut,bi,bj)
./verification/hs94.1x64x5/code_oad/cost_test.F 72 COST_TEST
     &              ig,jg,kLocOut,' TILE ',i,j,bi,bj
./verification/isomip/code_ad/cost_test.F 47 COST_TEST
         kLocOut =  1
./verification/isomip/code_ad/cost_test.F 51 COST_TEST
         kLocOut =  1
./verification/isomip/code_ad/cost_test.F 73 COST_TEST
     &              'COST    ',ig,jg,kLocOut,' TILE ',i,j,bi,bj
./verification/isomip/code_ad/cost_test.F 74 COST_TEST
               objf_test(bi,bj) = theta(i,j,kLocOut,bi,bj)
./verification/isomip/code_ad/cost_test.F 76 COST_TEST
               print *, 'ph-cost ', ig, jg, kLocOut,
./verification/isomip/code_ad/cost_test.F 77 COST_TEST
     &              theta(i,j,kLocOut,bi,bj)
./verification/isomip/code_oad/cost_test.F 47 COST_TEST
         kLocOut =  1
./verification/isomip/code_oad/cost_test.F 51 COST_TEST
         kLocOut =  1
./verification/isomip/code_oad/cost_test.F 73 COST_TEST
     &              'COST    ',ig,jg,kLocOut,' TILE ',i,j,bi,bj
./verification/isomip/code_oad/cost_test.F 74 COST_TEST
               objf_test(bi,bj) = theta(i,j,kLocOut,bi,bj)
./verification/isomip/code_oad/cost_test.F 76 COST_TEST
               print *, 'ph-cost ', ig, jg, kLocOut,
./verification/isomip/code_oad/cost_test.F 77 COST_TEST
     &              theta(i,j,kLocOut,bi,bj)
./pkg/cost/cost.h 147 NO PROCEDURE
     &                         , kLocOut
./pkg/cost/cost.h 150 NO PROCEDURE
      integer kLocOut
./pkg/cost/cost_test.F 46 COST_TEST
         kLocOut =  1
./pkg/cost/cost_test.F 50 COST_TEST
         kLocOut =  1
./pkg/cost/cost_test.F 70 COST_TEST
     &              'COST    ',ig,jg,kLocOut,' TILE ',i,j,bi,bj
./pkg/cost/cost_test.F 71 COST_TEST
               objf_test(bi,bj) = theta(i,j,kLocOut,bi,bj)
./pkg/cost/cost_test.F 73 COST_TEST
               print *, 'ph-cost ', ig, jg, kLocOut,
./pkg/cost/cost_test.F 74 COST_TEST
     &              theta(i,j,kLocOut,bi,bj)
./pkg/cost/cost_test.F 79 COST_TEST
     &                         theta(i,j,kLocOut,bi,bj)**2