Changeset 776 for LMDZ4/trunk/libf/phylmd/ini_histday.h
- Timestamp:
- Jun 7, 2007, 12:01:52 PM (17 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/trunk/libf/phylmd/ini_histday.h
r766 r776 36 36 c 37 37 CALL histdef(nid_day, "phis", "Surface geop. height", "m2/s2", 38 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,38 . iim,jj_nb,nhori, 1,1,1, -99, 32, 39 39 . "once", zstophy,zout) 40 40 c 41 41 CALL histdef(nid_day, "aire", "Grid area", "-", 42 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,42 . iim,jj_nb,nhori, 1,1,1, -99, 32, 43 43 . "once", zstophy,zout) 44 44 c 45 45 CALL histdef(nid_day, "contfracATM","% sfce ter+lic ","-", 46 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,46 . iim,jj_nb,nhori, 1,1,1, -99, 32, 47 47 . "once", zstophy,zout) 48 48 c 49 49 CALL histdef(nid_day, "contfracOR","% sfce terre OR", "-", 50 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,50 . iim,jj_nb,nhori, 1,1,1, -99, 32, 51 51 . "once", zstophy,zout) 52 52 c … … 54 54 c 55 55 CALL histdef(nid_day, "tsol", "Surface Temperature", "K", 56 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,56 . iim,jj_nb,nhori, 1,1,1, -99, 32, 57 57 . "ave(X)", zstophy,zout) 58 58 c 59 59 CALL histdef(nid_day, "t2m", "Temperature 2m", "K", 60 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,60 . iim,jj_nb,nhori, 1,1,1, -99, 32, 61 61 . "ave(X)", zstophy,zout) 62 62 c … … 66 66 CALL histdef(nid_day, "t2m_min", "Temp. 2m min.", 67 67 . "K", 68 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,68 . iim,jj_nb,nhori, 1,1,1, -99, 32, 69 69 . t2mincels, zstophy,zout) 70 70 c 71 71 CALL histdef(nid_day, "t2m_max", "Temp. 2m max.", 72 72 . "K", 73 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,73 . iim,jj_nb,nhori, 1,1,1, -99, 32, 74 74 . t2maxcels, zstophy,zout) 75 75 c 76 76 CALL histdef(nid_day, "plul", "Large-scale Precip.", 77 77 . "kg/(s*m2)", 78 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,78 . iim,jj_nb,nhori, 1,1,1, -99, 32, 79 79 . "ave(X)", zstophy,zout) 80 80 c 81 81 CALL histdef(nid_day, "pluc", "Convective Precip.", 82 82 . "kg/(s*m2)", 83 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,83 . iim,jj_nb,nhori, 1,1,1, -99, 32, 84 84 . "ave(X)", zstophy,zout) 85 85 c 86 86 CALL histdef(nid_day, "snowl", "Solid Large-scale Precip.", 87 87 . "kg/(m2*s)", 88 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,88 . iim,jj_nb,nhori, 1,1,1, -99, 32, 89 89 . "ave(X)", zstophy,zout) 90 90 c … … 92 92 CALL histdef(nid_day, "snowc", "Solid Convective Precip.", 93 93 . "kg/(m2*s)", 94 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,94 . iim,jj_nb,nhori, 1,1,1, -99, 32, 95 95 . "ave(X)", zstophy,zout) 96 96 ENDIF !snowc=0. 97 97 c 98 98 CALL histdef(nid_day, "flat", "Latent heat flux", "W/m2", 99 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,99 . iim,jj_nb,nhori, 1,1,1, -99, 32, 100 100 . "ave(X)", zstophy,zout) 101 101 c 102 102 CALL histdef(nid_day, "sicf", "Sea-ice fraction", "-", 103 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,103 . iim,jj_nb,nhori, 1,1,1, -99, 32, 104 104 . "inst(X)", zstoday,zout) 105 105 c 106 106 CALL histdef(nid_day, "q2m", "Specific humidity", "kg/kg", 107 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,107 . iim,jj_nb,nhori, 1,1,1, -99, 32, 108 108 . "ave(X)", zstophy,zout) 109 109 c 110 110 CALL histdef(nid_day, "u10m", "Vent zonal 10m", "m/s", 111 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,111 . iim,jj_nb,nhori, 1,1,1, -99, 32, 112 112 . "ave(X)", zstophy,zout) 113 113 c 114 114 CALL histdef(nid_day, "v10m", "Vent meridien 10m", "m/s", 115 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,115 . iim,jj_nb,nhori, 1,1,1, -99, 32, 116 116 . "ave(X)", zstophy,zout) 117 117 c 118 118 CALL histdef(nid_day, "wind10m","10-m wind speed","m/s", 119 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,119 . iim,jj_nb,nhori, 1,1,1, -99, 32, 120 120 . "ave(X)", zstophy,zout) 121 121 c 122 122 CALL histdef(nid_day, "wind10max", "10-m wind speed max.", 123 123 . "m/s", 124 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,124 . iim,jj_nb,nhori, 1,1,1, -99, 32, 125 125 . t2maxcels, zstophy,zout) 126 126 c 127 127 CALL histdef(nid_day, "psol", "Surface Pressure", "Pa", 128 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,128 . iim,jj_nb,nhori, 1,1,1, -99, 32, 129 129 . "ave(X)", zstophy,zout) 130 130 c 131 131 CALL histdef(nid_day, "precip","Precipitation Totale liq+sol" 132 132 . , "kg/(s*m2)", 133 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,133 . iim,jj_nb,nhori, 1,1,1, -99, 32, 134 134 . "ave(X)", zstophy,zout) 135 135 c 136 136 CALL histdef(nid_day, "snowf", "Snow fall", "kg/(m2*s)", 137 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,137 . iim,jj_nb,nhori, 1,1,1, -99, 32, 138 138 . "ave(X)", zstophy,zout) 139 139 c 140 140 c CALL histdef(nid_day, "snow_mass", "Snow Mass", "kg/m2", 141 c . iim,jj phy_nb,nhori, 1,1,1, -99, 32,141 c . iim,jj_nb,nhori, 1,1,1, -99, 32, 142 142 c . "ave(X)", zstophy,zout) 143 143 c 144 144 CALL histdef(nid_day, "evap", "Evaporation", "kg/(m2*s)", 145 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,145 . iim,jj_nb,nhori, 1,1,1, -99, 32, 146 146 . "ave(X)", zstophy,zout) 147 147 c 148 148 CALL histdef(nid_day, "tops", "Solar rad. at TOA", "W/m2", 149 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,149 . iim,jj_nb,nhori, 1,1,1, -99, 32, 150 150 . "ave(X)", zstophy,zout) 151 151 c 152 152 CALL histdef(nid_day, "topl", "IR rad. at TOA", "W/m2", 153 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,153 . iim,jj_nb,nhori, 1,1,1, -99, 32, 154 154 . "ave(X)", zstophy,zout) 155 155 c 156 156 CALL histdef(nid_day, "sols", "Net Solar rad. at surf.", 157 157 . "W/m2", 158 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,158 . iim,jj_nb,nhori, 1,1,1, -99, 32, 159 159 . "ave(X)", zstophy,zout) 160 160 c 161 161 CALL histdef(nid_day, "soll", "Net IR rad. at surface", "W/m2", 162 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,162 . iim,jj_nb,nhori, 1,1,1, -99, 32, 163 163 . "ave(X)", zstophy,zout) 164 164 c 165 165 CALL histdef(nid_day, "radsol", "Rayonnement au sol", "W/m2", 166 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,166 . iim,jj_nb,nhori, 1,1,1, -99, 32, 167 167 . "ave(X)", zstophy,zout) 168 168 c 169 169 CALL histdef(nid_day, "cldl", "Low-level cloudiness", "-", 170 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,170 . iim,jj_nb,nhori, 1,1,1, -99, 32, 171 171 . "ave(X)", zstophy,zout) 172 172 c 173 173 CALL histdef(nid_day, "cldm", "Mid-level cloudiness", "-", 174 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,174 . iim,jj_nb,nhori, 1,1,1, -99, 32, 175 175 . "ave(X)", zstophy,zout) 176 176 c 177 177 CALL histdef(nid_day, "cldh", "High-level cloudiness", "-", 178 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,178 . iim,jj_nb,nhori, 1,1,1, -99, 32, 179 179 . "ave(X)", zstophy,zout) 180 180 c 181 181 CALL histdef(nid_day, "cldt", "Total cloudiness", "-", 182 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,182 . iim,jj_nb,nhori, 1,1,1, -99, 32, 183 183 . "ave(X)", zstophy,zout) 184 184 c 185 185 CALL histdef(nid_day, "cldq", "Cloud liquid water path", 186 186 . "kg/m2", 187 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,187 . iim,jj_nb,nhori, 1,1,1, -99, 32, 188 188 . "ave(X)", zstophy,zout) 189 189 c 190 190 CALL histdef(nid_day, "prw", "Precipitable water", "kg/m2", 191 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,191 . iim,jj_nb,nhori, 1,1,1, -99, 32, 192 192 . "ave(X)", zstophy,zout) 193 193 c … … 210 210 CALL histdef(nid_day, "u"//bb2, 211 211 . "Zonal wind "//bb2//"mb","m/s", 212 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,212 . iim,jj_nb,nhori, 1,1,1, -99, 32, 213 213 . "inst(X)", zout,zout) 214 214 c 215 215 CALL histdef(nid_day, "v"//bb2, 216 216 . "Meridional wind "//bb2//"mb","m/s", 217 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,217 . iim,jj_nb,nhori, 1,1,1, -99, 32, 218 218 . "inst(X)", zout,zout) 219 219 c … … 224 224 CALL histdef(nid_day, "w"//bb2, "Vertical wind "//bb2//"mb", 225 225 . "m/s", 226 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,226 . iim,jj_nb,nhori, 1,1,1, -99, 32, 227 227 . "inst(X)", zout,zout) 228 228 c 229 229 CALL histdef(nid_day,"phi"//bb2, "Geopotential "//bb2//"mb", 230 230 . "m", 231 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,231 . iim,jj_nb,nhori, 1,1,1, -99, 32, 232 232 . "inst(X)", zout,zout) 233 233 c … … 237 237 c 238 238 CALL histdef(nid_day, "slp", "Sea Level Pressure", "Pa", 239 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,239 . iim,jj_nb,nhori, 1,1,1, -99, 32, 240 240 . "ave(X)", zstophy,zout) 241 241 c 242 242 CALL histdef(nid_day, "cape_max", "CAPE max.", 243 243 . "J/kg", 244 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,244 . iim,jj_nb,nhori, 1,1,1, -99, 32, 245 245 . capemaxcels, zstophy,zout) 246 246 c 247 247 CALL histdef(nid_day, "solldown", "Down. IR rad. at surface", 248 . "W/m2", iim,jj phy_nb,nhori, 1,1,1, -99, 32,248 . "W/m2", iim,jj_nb,nhori, 1,1,1, -99, 32, 249 249 . "ave(X)", zstophy,zout) 250 250 c 251 251 CALL histdef(nid_day, "sens", "Sensible heat flux", "W/m2", 252 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,252 . iim,jj_nb,nhori, 1,1,1, -99, 32, 253 253 . "ave(X)", zstophy,zout) 254 254 c 255 255 CALL histdef(nid_day, "SWdnSFC", "SWdn at surface","W/m2", 256 . iim,jj phy_nb,nhori, 1,1,1,-99,256 . iim,jj_nb,nhori, 1,1,1,-99, 257 257 . 32, "ave(X)", zstophy,zout) 258 258 c … … 264 264 CALL histdef(nid_day, "lmt_bils", 265 265 . "Bilan au sol atmosphere forcee", "W/m2", 266 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,266 . iim,jj_nb,nhori, 1,1,1, -99, 32, 267 267 . "ave(X)", zstophy,zout) 268 268 c … … 271 271 CALL histdef(nid_day, "slab_bils", 272 272 . "Bilan au sol slab", "W/m2", 273 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,273 . iim,jj_nb,nhori, 1,1,1, -99, 32, 274 274 . "ave(X)", zstophy,zout) 275 275 c 276 276 CALL histdef(nid_day, "tslab", "Slab SST ", "K", 277 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,277 . iim,jj_nb,nhori, 1,1,1, -99, 32, 278 278 . "ave(X)", zstophy,zout) 279 279 c 280 280 CALL histdef(nid_day, "seaice", "Slab seaice", "kg/m2", 281 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,281 . iim,jj_nb,nhori, 1,1,1, -99, 32, 282 282 . "ave(X)", zstophy,zout) 283 283 c 284 284 CALL histdef(nid_day, "siceh", "Slab seaice height", "m", 285 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,285 . iim,jj_nb,nhori, 1,1,1, -99, 32, 286 286 . "ave(X)", zstophy,zout) 287 287 c … … 290 290 CALL histdef(nid_day, "fluxo", 291 291 . "Flux turbulents ocean-atmosphere", "W/m2", 292 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,292 . iim,jj_nb,nhori, 1,1,1, -99, 32, 293 293 . "ave(X)", zstophy,zout) 294 294 c 295 295 CALL histdef(nid_day, "fluxg", 296 296 . "Flux ocean-glace de mer", "W/m2", 297 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,297 . iim,jj_nb,nhori, 1,1,1, -99, 32, 298 298 . "ave(X)", zstophy,zout) 299 299 c … … 303 303 c 304 304 CALL histdef(nid_day, "bils", "Surf. total heat flux", "W/m2", 305 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,305 . iim,jj_nb,nhori, 1,1,1, -99, 32, 306 306 . "ave(X)", zstophy,zout) 307 307 c 308 308 CALL histdef(nid_day, "fder", "Heat flux derivation", "W/m2/K", 309 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,309 . iim,jj_nb,nhori, 1,1,1, -99, 32, 310 310 . "ave(X)", zstophy,zout) 311 311 c … … 321 321 c 322 322 CALL histdef(nid_day, "temp", "Air temperature", "K", 323 . iim,jj phy_nb,nhori, klev,1,klev,nvert, 32,323 . iim,jj_nb,nhori, klev,1,klev,nvert, 32, 324 324 . "ave(X)", zstophy,zout) 325 325 c 326 326 CALL histdef(nid_day, "ovap", "Specific humidity", "kg/kg", 327 . iim,jj phy_nb,nhori, klev,1,klev,nvert, 32,327 . iim,jj_nb,nhori, klev,1,klev,nvert, 32, 328 328 . "ave(X)", zstophy,zout) 329 329 c 330 330 CALL histdef(nid_day, "geop", "Geopotential height", "m2/s2", 331 . iim,jj phy_nb,nhori, klev,1,klev,nvert, 32,331 . iim,jj_nb,nhori, klev,1,klev,nvert, 32, 332 332 . "ave(X)", zstophy,zout) 333 333 c 334 334 CALL histdef(nid_day, "vitu", "Zonal wind", "m/s", 335 . iim,jj phy_nb,nhori, klev,1,klev,nvert, 32,335 . iim,jj_nb,nhori, klev,1,klev,nvert, 32, 336 336 . "ave(X)", zstophy,zout) 337 337 c 338 338 CALL histdef(nid_day, "vitv", "Meridional wind", "m/s", 339 . iim,jj phy_nb,nhori, klev,1,klev,nvert, 32,339 . iim,jj_nb,nhori, klev,1,klev,nvert, 32, 340 340 . "ave(X)", zstophy,zout) 341 341 c 342 342 CALL histdef(nid_day, "vitw", "Vertical wind", "m/s", 343 . iim,jj phy_nb,nhori, klev,1,klev,nvert, 32,343 . iim,jj_nb,nhori, klev,1,klev,nvert, 32, 344 344 . "ave(X)", zstophy,zout) 345 345 c 346 346 CALL histdef(nid_day, "pres", "Air pressure", "Pa", 347 . iim,jj phy_nb,nhori, klev,1,klev,nvert, 32,347 . iim,jj_nb,nhori, klev,1,klev,nvert, 32, 348 348 . "ave(X)", zstophy,zout) 349 349 c … … 361 361 c 362 362 CALL histdef(nid_day, "SWupTOA", "SWup at TOA","W/m2", 363 . iim,jj phy_nb,nhori, 1,1,1,-99,363 . iim,jj_nb,nhori, 1,1,1,-99, 364 364 . 32, "ave(X)", zstophy,zout) 365 365 c 366 366 CALL histdef(nid_day, "SWupSFC", "SWup at surface","W/m2", 367 . iim,jj phy_nb,nhori, 1,1,1,-99,367 . iim,jj_nb,nhori, 1,1,1,-99, 368 368 . 32, "ave(X)", zstophy,zout) 369 369 c 370 370 CALL histdef(nid_day, "SWdnTOA", "SWdn at TOA","W/m2", 371 . iim,jj phy_nb,nhori, 1,1,1,-99,371 . iim,jj_nb,nhori, 1,1,1,-99, 372 372 . 32, "ave(X)", zstophy,zout) 373 373 c 374 374 CALL histdef(nid_day, "SWupTOAclr", 375 375 . "SWup clear sky at TOA","W/m2", 376 . iim,jj phy_nb,nhori, 1,1,1,-99,376 . iim,jj_nb,nhori, 1,1,1,-99, 377 377 . 32, "ave(X)", zstophy,zout) 378 378 379 379 CALL histdef(nid_day, "SWupSFCclr", 380 380 . "SWup clear sky at surface","W/m2", 381 . iim,jj phy_nb,nhori, 1,1,1,-99,381 . iim,jj_nb,nhori, 1,1,1,-99, 382 382 . 32, "ave(X)", zstophy,zout) 383 383 384 384 CALL histdef(nid_day, "SWdnTOAclr", 385 385 . "SWdn clear sky at TOA","W/m2", 386 . iim,jj phy_nb,nhori, 1,1,1,-99,386 . iim,jj_nb,nhori, 1,1,1,-99, 387 387 . 32, "ave(X)", zstophy,zout) 388 388 389 389 CALL histdef(nid_day, "SWdnSFCclr", 390 390 . "SWdn clear sky at surface","W/m2", 391 . iim,jj phy_nb,nhori, 1,1,1,-99,391 . iim,jj_nb,nhori, 1,1,1,-99, 392 392 . 32, "ave(X)", zstophy,zout) 393 393 c … … 395 395 CALL histdef(nid_day, "LWdnSFC", 396 396 . "LW down at surface","W/m2", 397 . iim,jj phy_nb,nhori, 1,1,1,-99,397 . iim,jj_nb,nhori, 1,1,1,-99, 398 398 . 32, "ave(X)", zstophy,zout) 399 399 c 400 400 CALL histdef(nid_day, "LWupSFC", 401 401 . "LW down at surface","W/m2", 402 . iim,jj phy_nb,nhori, 1,1,1,-99,402 . iim,jj_nb,nhori, 1,1,1,-99, 403 403 . 32, "ave(X)", zstophy,zout) 404 404 c … … 407 407 c . "Cld top pressure","mb", 408 408 . "Cld top pressure (cf ISCCP simulator)","Pa", 409 . iim,jj phy_nb,nhori, 1,1,1,-99,409 . iim,jj_nb,nhori, 1,1,1,-99, 410 410 . 32, "ave(X)", zstophy,zout) 411 411 cIM ENDIF !(iflag_con.GE.3) THEN … … 418 418 c 419 419 CALL histdef(nid_day, "tter", "Surface Temperature ter", "K", 420 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,420 . iim,jj_nb,nhori, 1,1,1, -99, 32, 421 421 . "ave(X)", zstophy,zout) 422 422 c 423 423 CALL histdef(nid_day, "tlic", "Surface Temperature lic", "K", 424 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,424 . iim,jj_nb,nhori, 1,1,1, -99, 32, 425 425 . "ave(X)", zstophy,zout) 426 426 c 427 427 CALL histdef(nid_day, "toce", "Surface Temperature oce", "K", 428 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,428 . iim,jj_nb,nhori, 1,1,1, -99, 32, 429 429 . "ave(X)", zstophy,zout) 430 430 c 431 431 CALL histdef(nid_day, "tsic", "Surface Temperature sic", "K", 432 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,432 . iim,jj_nb,nhori, 1,1,1, -99, 32, 433 433 . "ave(X)", zstophy,zout) 434 434 c 435 435 CALL histdef(nid_day, "t2mter", "Temp.tere 2m", "K", 436 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,436 . iim,jj_nb,nhori, 1,1,1, -99, 32, 437 437 . "ave(X)", zstophy,zout) 438 438 c 439 439 CALL histdef(nid_day, "t2mlic", "Temp.lic 2m", "K", 440 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,440 . iim,jj_nb,nhori, 1,1,1, -99, 32, 441 441 . "ave(X)", zstophy,zout) 442 442 c 443 443 CALL histdef(nid_day, "t2moce", "Temp.oce 2m", "K", 444 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,444 . iim,jj_nb,nhori, 1,1,1, -99, 32, 445 445 . "ave(X)", zstophy,zout) 446 446 c 447 447 CALL histdef(nid_day, "t2msic", "Temp.sic 2m", "K", 448 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,448 . iim,jj_nb,nhori, 1,1,1, -99, 32, 449 449 . "ave(X)", zstophy,zout) 450 450 c 451 451 CALL histdef(nid_day, "t2mter_min", "Temp.terre 2m min.", 452 452 . "K", 453 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,453 . iim,jj_nb,nhori, 1,1,1, -99, 32, 454 454 . t2mincels, zstophy,zout) 455 455 c 456 456 CALL histdef(nid_day, "t2mter_max", "Temp.terre 2m max.", 457 457 . "K", 458 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,458 . iim,jj_nb,nhori, 1,1,1, -99, 32, 459 459 . t2maxcels, zstophy,zout) 460 460 c 461 461 CALL histdef(nid_day, "u10mter", "Vent zonal ter 10m", "m/s", 462 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,462 . iim,jj_nb,nhori, 1,1,1, -99, 32, 463 463 . "ave(X)", zstophy,zout) 464 464 c 465 465 CALL histdef(nid_day, "u10mlic", "Vent zonal lic 10m", "m/s", 466 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,466 . iim,jj_nb,nhori, 1,1,1, -99, 32, 467 467 . "ave(X)", zstophy,zout) 468 468 c 469 469 CALL histdef(nid_day, "u10moce", "Vent zonal oce 10m", "m/s", 470 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,470 . iim,jj_nb,nhori, 1,1,1, -99, 32, 471 471 . "ave(X)", zstophy,zout) 472 472 c 473 473 CALL histdef(nid_day, "u10msic", "Vent zonal sic 10m", 474 . "m/s",iim,jj phy_nb,nhori, 1,1,1, -99, 32,474 . "m/s",iim,jj_nb,nhori, 1,1,1, -99, 32, 475 475 . "ave(X)", zstophy,zout) 476 476 c 477 477 CALL histdef(nid_day, "v10mter", "Vent meridien ter 10m", 478 . "m/s", iim,jj phy_nb,nhori, 1,1,1, -99, 32,478 . "m/s", iim,jj_nb,nhori, 1,1,1, -99, 32, 479 479 . "ave(X)", zstophy,zout) 480 480 c 481 481 CALL histdef(nid_day, "v10mlic", "Vent meridien lic 10m", 482 . "m/s",iim,jj phy_nb,nhori, 1,1,1, -99, 32,482 . "m/s",iim,jj_nb,nhori, 1,1,1, -99, 32, 483 483 . "ave(X)", zstophy,zout) 484 484 c 485 485 CALL histdef(nid_day, "v10moce", "Vent meridien oce 10m", 486 . "m/s",iim,jj phy_nb,nhori, 1,1,1, -99, 32,486 . "m/s",iim,jj_nb,nhori, 1,1,1, -99, 32, 487 487 . "ave(X)", zstophy,zout) 488 488 c 489 489 CALL histdef(nid_day, "v10msic", "Vent meridien sic 10m", 490 . "m/s",iim,jj phy_nb,nhori, 1,1,1, -99, 32,490 . "m/s",iim,jj_nb,nhori, 1,1,1, -99, 32, 491 491 . "ave(X)", zstophy,zout) 492 492 c … … 495 495 call histdef(nid_day, "pourc_"//clnsurf(nsrf), 496 496 $ "% "//clnsurf(nsrf), "%", 497 $ iim,jj phy_nb,nhori, 1,1,1, -99, 32,497 $ iim,jj_nb,nhori, 1,1,1, -99, 32, 498 498 $ "ave(X)", zstophy,zout) 499 499 C 500 500 call histdef(nid_day, "fract_"//clnsurf(nsrf), 501 501 $ "Fraction "//clnsurf(nsrf), "1", 502 $ iim,jj phy_nb,nhori, 1,1,1, -99, 32,502 $ iim,jj_nb,nhori, 1,1,1, -99, 32, 503 503 $ "ave(X)", zstophy,zout) 504 504 C 505 505 call histdef(nid_day, "tsol_"//clnsurf(nsrf), 506 506 $ "Temperature "//clnsurf(nsrf), "K", 507 $ iim,jj phy_nb,nhori, 1,1,1, -99, 32,507 $ iim,jj_nb,nhori, 1,1,1, -99, 32, 508 508 $ "ave(X)", zstophy,zout) 509 509 C 510 510 call histdef(nid_day, "sens_"//clnsurf(nsrf), 511 511 $ "Sensible heat flux "//clnsurf(nsrf), "W/m2", 512 $ iim,jj phy_nb,nhori, 1,1,1, -99, 32,512 $ iim,jj_nb,nhori, 1,1,1, -99, 32, 513 513 $ "ave(X)", zstophy,zout) 514 514 c 515 515 call histdef(nid_day, "lat_"//clnsurf(nsrf), 516 516 $ "Latent heat flux "//clnsurf(nsrf), "W/m2", 517 $ iim,jj phy_nb,nhori, 1,1,1, -99, 32,517 $ iim,jj_nb,nhori, 1,1,1, -99, 32, 518 518 $ "ave(X)", zstophy,zout) 519 519 C 520 520 call histdef(nid_day, "taux_"//clnsurf(nsrf), 521 521 $ "Zonal wind stress "//clnsurf(nsrf),"Pa", 522 $ iim,jj phy_nb,nhori, 1,1,1, -99, 32,522 $ iim,jj_nb,nhori, 1,1,1, -99, 32, 523 523 $ "ave(X)", zstophy,zout) 524 524 525 525 call histdef(nid_day, "tauy_"//clnsurf(nsrf), 526 526 $ "Meridional wind stress "//clnsurf(nsrf), "Pa", 527 $ iim,jj phy_nb,nhori, 1,1,1, -99, 32,527 $ iim,jj_nb,nhori, 1,1,1, -99, 32, 528 528 $ "ave(X)", zstophy,zout) 529 529 C 530 530 call histdef(nid_day, "albe_"//clnsurf(nsrf), 531 531 $ "Albedo surf. "//clnsurf(nsrf), "-", 532 $ iim,jj phy_nb,nhori, 1,1,1, -99, 32,532 $ iim,jj_nb,nhori, 1,1,1, -99, 32, 533 533 $ "ave(X)", zstophy,zout) 534 534 C 535 535 call histdef(nid_day, "rugs_"//clnsurf(nsrf), 536 536 $ "Rugosite "//clnsurf(nsrf), "m", 537 $ iim,jj phy_nb,nhori, 1,1,1, -99, 32,537 $ iim,jj_nb,nhori, 1,1,1, -99, 32, 538 538 $ "ave(X)", zstophy,zout) 539 539 C … … 552 552 CALL histdef(nid_day, "tops0", "CS Solar rad. at TOA", 553 553 . "W/m2", 554 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,554 . iim,jj_nb,nhori, 1,1,1, -99, 32, 555 555 . "ave(X)", zstophy,zout) 556 556 c 557 557 CALL histdef(nid_day, "topl0", "CS IR rad. at TOA", 558 558 . "W/m2", 559 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,559 . iim,jj_nb,nhori, 1,1,1, -99, 32, 560 560 . "ave(X)", zstophy,zout) 561 561 c 562 562 CALL histdef(nid_day, "sols0", "CS Net Solar rad. at surf.", 563 563 . "W/m2", 564 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,564 . iim,jj_nb,nhori, 1,1,1, -99, 32, 565 565 . "ave(X)", zstophy,zout) 566 566 c 567 567 CALL histdef(nid_day, "soll0", "CS Net IR rad. at surface", 568 568 . "W/m2", 569 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,569 . iim,jj_nb,nhori, 1,1,1, -99, 32, 570 570 . "ave(X)", zstophy,zout) 571 571 c 572 572 CALL histdef(nid_day, "rneb", "Cloud fraction", "-", 573 . iim,jj phy_nb,nhori, klev,1,klev,nvert, 32,573 . iim,jj_nb,nhori, klev,1,klev,nvert, 32, 574 574 . "ave(X)", zstophy,zout) 575 575 c 576 576 CALL histdef(nid_day, "rnebcon", "Convective Cloud Fraction" 577 577 . , "-", 578 . iim,jj phy_nb,nhori, klev,1,klev,nvert, 32,578 . iim,jj_nb,nhori, klev,1,klev,nvert, 32, 579 579 . "ave(X)", zstophy,zout) 580 580 c 581 581 CALL histdef(nid_day,"lwcon","Cloud liquid water content", 582 582 . "kg/kg", 583 . iim,jj phy_nb,nhori, klev,1,klev, nvert, 32,583 . iim,jj_nb,nhori, klev,1,klev, nvert, 32, 584 584 . "ave(X)", zstophy,zout) 585 585 c 586 586 CALL histdef(nid_day,"iwcon","Cloud ice water content","kg/kg", 587 . iim,jj phy_nb,nhori, klev,1,klev, nvert, 32,587 . iim,jj_nb,nhori, klev,1,klev, nvert, 32, 588 588 . "ave(X)", zstophy,zout) 589 589 c 590 590 CALL histdef(nid_day,"lwp","Cloud water path","kg/m2", 591 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,591 . iim,jj_nb,nhori, 1,1,1, -99, 32, 592 592 . "ave(X)", zstophy,zout) 593 593 c 594 594 CALL histdef(nid_day,"iwp","Cloud ice water path","kg/m2", 595 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,595 . iim,jj_nb,nhori, 1,1,1, -99, 32, 596 596 . "ave(X)", zstophy,zout) 597 597 c 598 598 CALL histdef(nid_day,"meantaucld", 599 599 . "ISCCP mean cloud optical thickness","1", 600 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,600 . iim,jj_nb,nhori, 1,1,1, -99, 32, 601 601 . "ave(X)", zstophy,zout) 602 602 c 603 603 CALL histdef(nid_day,"cldtau","Cloud optical thickness","1", 604 . iim,jj phy_nb,nhori, klev,1,klev, nvert, 32,604 . iim,jj_nb,nhori, klev,1,klev, nvert, 32, 605 605 . "ave(X)", zstophy,zout) 606 606 c 607 607 CALL histdef(nid_day,"cldemi","Cloud optical emissivity","1", 608 . iim,jj phy_nb,nhori, klev,1,klev, nvert, 32,608 . iim,jj_nb,nhori, klev,1,klev, nvert, 32, 609 609 . "ave(X)", zstophy,zout) 610 610 c … … 612 612 c 613 613 CALL histdef(nid_day, "dtcon", "Convection dT", "K/s", 614 . iim,jj phy_nb,nhori, klev,1,klev,nvert, 32,614 . iim,jj_nb,nhori, klev,1,klev,nvert, 32, 615 615 . "ave(X)", zstophy,zout) 616 616 c 617 617 CALL histdef(nid_day, "dqcon", "Convection dQ", "(kg/kg)/s", 618 . iim,jj phy_nb,nhori, klev,1,klev,nvert, 32,618 . iim,jj_nb,nhori, klev,1,klev,nvert, 32, 619 619 . "ave(X)", zstophy,zout) 620 620 c 621 621 CALL histdef(nid_day, "rh2m", "Relative humidity at 2m", "%", 622 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,622 . iim,jj_nb,nhori, 1,1,1, -99, 32, 623 623 . "ave(X)", zstophy,zout) 624 624 c 625 625 CALL histdef(nid_day, "qsat2m", "Saturant humidity at 2m", "%", 626 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,626 . iim,jj_nb,nhori, 1,1,1, -99, 32, 627 627 . "ave(X)", zstophy,zout) 628 628 c 629 629 CALL histdef(nid_day, "tpot", 630 630 . "Surface air potential temperature", "K", 631 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,631 . iim,jj_nb,nhori, 1,1,1, -99, 32, 632 632 . "ave(X)", zstophy,zout) 633 633 c 634 634 CALL histdef(nid_day, "tpote", 635 635 . "Surface air equivalent potential temperature", "K", 636 . iim,jj phy_nb,nhori, 1,1,1, -99, 32,636 . iim,jj_nb,nhori, 1,1,1, -99, 32, 637 637 . "ave(X)", zstophy,zout) 638 638 c
Note: See TracChangeset
for help on using the changeset viewer.