From 48b77d588236ac0130c425ef67720cd9031c5215 Mon Sep 17 00:00:00 2001 From: George Gayno Date: Mon, 15 Mar 2021 14:53:30 +0000 Subject: [PATCH 1/2] Clear doxygen warnings from ./global_cycle.fd/sfcsub.F Part of #191 Fixes #398 --- sorc/global_cycle.fd/sfcsub.F | 21 +++------------------ 1 file changed, 3 insertions(+), 18 deletions(-) diff --git a/sorc/global_cycle.fd/sfcsub.F b/sorc/global_cycle.fd/sfcsub.F index 732c2f8bc..4289be284 100644 --- a/sorc/global_cycle.fd/sfcsub.F +++ b/sorc/global_cycle.fd/sfcsub.F @@ -1,6 +1,6 @@ -!> @file -!! @brief This is a limited point version of surface program. -!! @author M. Iredell, xuli, Hang Lei, George Gayno +C> @file +C> @brief This is a limited point version of surface program. +C> @author M. Iredell, xuli, Hang Lei, George Gayno !> This program runs in two different modes: !! @@ -3859,18 +3859,14 @@ subroutine filanl(tsfanl,tsfan2,wetanl,snoanl,zoranl,albanl, & tg3anl,cvanl ,cvbanl,cvtanl, & cnpanl,smcanl,stcanl,slianl,scvanl,veganl, & vetanl,sotanl,alfanl, -!cwu [+1l] add ()anl for sih, sic & sihanl,sicanl, -!clu [+1l] add ()anl for vmn, vmx, slp, abs & vmnanl,vmxanl,slpanl,absanl, & tsfclm,tsfcl2,wetclm,snoclm,zorclm,albclm, & aisclm, & tg3clm,cvclm ,cvbclm,cvtclm, & cnpclm,smcclm,stcclm,sliclm,scvclm,vegclm, & vetclm,sotclm,alfclm, -!cwu [+1l] add ()clm for sih, sic & sihclm,sicclm, -!clu [+1l] add ()clm for vmn, vmx, slp, abs & vmnclm,vmxclm,slpclm,absclm, & len,lsoil) use machine , only : kind_io8,kind_io4 @@ -4082,25 +4078,19 @@ subroutine analy(lugb,iy,im,id,ih,fh,len,lsoil, & slmask,fntsfa,fnweta,fnsnoa,fnzora,fnalba,fnaisa, & fntg3a,fnscva,fnsmca,fnstca,fnacna,fnvega, & fnveta,fnsota, -!clu [+1l] add fn()a for vmn, vmx, slp, abs & fnvmna,fnvmxa,fnslpa,fnabsa, & tsfanl,wetanl,snoanl,zoranl,albanl,aisanl, & tg3anl,cvanl ,cvbanl,cvtanl, & smcanl,stcanl,slianl,scvanl,acnanl,veganl, & vetanl,sotanl,alfanl,tsfan0, -!clu [+1l] add ()anl for vmn, vmx, slp, abs & vmnanl,vmxanl,slpanl,absanl, -!cggg snow mods start & kpdtsf,kpdwet,kpdsno,kpdzor,kpdalb,kpdais, & kpdtsf,kpdwet,kpdsno,kpdsnd,kpdzor,kpdalb,kpdais, -!cggg snow mods end & kpdtg3,kpdscv,kpdacn,kpdsmc,kpdstc,kpdveg, & kprvet,kpdsot,kpdalf, -!clu [+1l] add kpd() for vmn, vmx, slp, abs & kpdvmn,kpdvmx,kpdslp,kpdabs, & irttsf,irtwet,irtsno,irtzor,irtalb,irtais, & irttg3,irtscv,irtacn,irtsmc,irtstc,irtveg, & irtvet,irtsot,irtalf -!clu [+1l] add irt() for vmn, vmx, slp, abs &, irtvmn,irtvmx,irtslp,irtabs &, imsk, jmsk, slmskh, outlat, outlon &, gaus, blno, blto, me, lanom) @@ -4803,17 +4793,13 @@ subroutine filfcs(tsffcs,wetfcs,snofcs,zorfcs,albfcs, & tg3fcs,cvfcs ,cvbfcs,cvtfcs, & cnpfcs,smcfcs,stcfcs,slifcs,aisfcs, & vegfcs, vetfcs, sotfcs, alffcs, -!cwu [+1l] add ()fcs for sih, sic & sihfcs,sicfcs, -!clu [+1l] add ()fcs for vmn, vmx, slp, abs & vmnfcs,vmxfcs,slpfcs,absfcs, & tsfanl,wetanl,snoanl,zoranl,albanl, & tg3anl,cvanl ,cvbanl,cvtanl, & cnpanl,smcanl,stcanl,slianl,aisanl, & veganl, vetanl, sotanl, alfanl, -!cwu [+1l] add ()anl for sih, sic & sihanl,sicanl, -!clu [+1l] add ()anl for vmn, vmx, slp, abs & vmnanl,vmxanl,slpanl,absanl, & len,lsoil) ! @@ -5686,7 +5672,6 @@ end subroutine merge !! @author Shrinivas Moorthi !! @author Xingen Wu subroutine newice(slianl,slifcs,tsfanl,tsffcs,len,lsoil, -!cwu [+1l] add sihnew,sicnew,sihanl,sicanl & sihnew,sicnew,sihanl,sicanl, & albanl,snoanl,zoranl,smcanl,stcanl, & albsea,snosea,zorsea,smcsea,smcice, From 06e624e2932ec8733a72ba95d073005b6d7be4d4 Mon Sep 17 00:00:00 2001 From: George Gayno Date: Mon, 15 Mar 2021 18:44:54 +0000 Subject: [PATCH 2/2] Minor doxygen update to ./global_cycle.fd/sfcsub.F Part of #191 Fixes #398 --- sorc/global_cycle.fd/sfcsub.F | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/sorc/global_cycle.fd/sfcsub.F b/sorc/global_cycle.fd/sfcsub.F index 4289be284..a05452ba2 100644 --- a/sorc/global_cycle.fd/sfcsub.F +++ b/sorc/global_cycle.fd/sfcsub.F @@ -1,6 +1,6 @@ C> @file C> @brief This is a limited point version of surface program. -C> @author M. Iredell, xuli, Hang Lei, George Gayno +C> @author Shrinivas Moorthi Mark Iredell NOAA/EMC !> This program runs in two different modes: !!