--- trunk/Sources/phylmd/ini_histins.f 2017/04/28 13:40:59 224 +++ trunk/Sources/phylmd/ini_histins.f 2017/10/16 12:35:41 225 @@ -170,6 +170,14 @@ "rugosite "//clnsurf(nsrf), "-", & iim, (jjm + 1), nhori, 1, 1, 1, -99, & "inst(X)", zsto, zout) + call histdef(nid_ins, "u10m_"//clnsurf(nsrf), & + "zonal wind 10 m "//clnsurf(nsrf), "m s-1", & + iim, (jjm + 1), nhori, 1, 1, 1, -99, & + "inst(X)", zsto, zout) + call histdef(nid_ins, "v10m_"//clnsurf(nsrf), & + "meridional wind 10 m "//clnsurf(nsrf), "m s-1", & + iim, (jjm + 1), nhori, 1, 1, 1, -99, & + "inst(X)", zsto, zout) END DO CALL histdef(nid_ins, "rugs", "rugosity", "-", &