--- trunk/Sources/phylmd/Orography/orosetup.f 2017/11/15 13:56:45 246 +++ trunk/Sources/phylmd/Orography/orosetup.f 2018/01/05 14:45:45 247 @@ -9,10 +9,10 @@ pvph, ppsi, pzdep, pulow, pvlow, ptheta, pgamma, pmea, ppic, pval, pnu, & pd1, pd2, pdmod) - ! *gwsetup* - ! interface from *orodrag* - ! see ecmwf research department documentation of the "i.f.s." - ! modifications f.lott for the new-gwdrag scheme november 1993 + ! gwsetup + ! Interface from orodrag. + ! See ECMWF research department documentation of the I.F.S. + ! Modifications F. Lott for the new-gwdrag scheme, november 1993. USE dimens_m USE dimphy