[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