[cam-users] CCM3.10 history averaging problem

Joe Barsugli jjb@cdc.noaa.gov
Tue, 6 Aug 2002 20:02:20 -0600 (MDT)


The averaging flag as documented in
http://www.cgd.ucar.edu/cms/ccm3/news/ccm3.10.11_366physics_avg.shtml doesn't
seem to work properly.  This is because "ff" is not defined in the following
code from fldlst.F90:

   do t=1,ptapes
      do f=1,nfmaster
         mastername = masterlist(f)%name
         if (isonlist (fincl(1,t), mastername)) then
            call split_nameflag (fincl(ff,t), name, avgflag)
            call inifld (t, f, avgflag)
         else if (.not. isonlist (fexcl(1,t), mastername) .and. masterlist(f)%actflag(t)) then
            call inifld (t, f, ' ')
         end if
      end do
[ . . . ]
   end do

you can download a version of fldlst.F90 that seems to work for me:

http://www.cdc.noaa.gov/~jjb/ccm/fldlst_2.F90


CCM3 Version:ccm3.10.11.brnchT.366physics.7.tar

--
Joe Barsugli ::  jjb@cdc.noaa.gov :: 303-497-6042
Climate Diagnostics Center :: University of Colorado