Changeset 1398 for LMDZ4/trunk/libf/phylmd/ini_histmthNMC.h
- Timestamp:
- Jun 4, 2010, 6:56:18 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
LMDZ4/trunk/libf/phylmd/ini_histmthNMC.h
r1374 r1398 27 27 . nhori, nid_mthnmc) 28 28 c 29 CALL histvert(nid_mthnmc, "plev", "pressure", "Pa", 30 . nlevSTD, rlevSTD, nvert) 31 ccc 29 CALL histvert(nid_mthnmc, "plev", "pressure", "mb", 30 . nlevSTD, rlevSTD/100., nvert,"down") 31 c 32 cIM Astuce MAF: remplacer inst par ave pour les variables NMC pour avoir 33 cIM le time_counter et les bounds 34 cIM 32 35 ccc Champs 3D interpolles sur des niveaux de pression du NMC 33 36 ccc … … 44 47 . "Valeurs non-definies","-", 45 48 . iim,jj_nb,nhori, nlevSTD,1,nlevSTD, nvert, 32, 46 . " inst(X)", zout,zout)49 . "ave(X)", zout,zout) 47 50 c 48 51 CALL histdef(nid_mthnmc, "ta", 49 52 . "Air temperature","K", 50 53 . iim,jj_nb,nhori, nlevSTD,1,nlevSTD, nvert, 32, 51 . " inst(X)", zout,zout)54 . "ave(X)", zout,zout) 52 55 c 53 56 CALL histdef(nid_mthnmc, "zg", 54 57 . "Geopotential height", "m", 55 58 . iim,jj_nb,nhori, nlevSTD,1,nlevSTD, nvert, 32, 56 . " inst(X)", zout,zout)59 . "ave(X)", zout,zout) 57 60 c 58 61 CALL histdef(nid_mthnmc, "hus", 59 62 . "Specific humidity","1", 60 63 . iim,jj_nb,nhori, nlevSTD,1,nlevSTD, nvert, 32, 61 . " inst(X)", zout,zout)64 . "ave(X)", zout,zout) 62 65 c 63 66 CALL histdef(nid_mthnmc, "hur", 64 67 . "Relative humidity", "%", 65 68 . iim,jj_nb,nhori, nlevSTD,1,nlevSTD, nvert, 32, 66 . " inst(X)", zout,zout)69 . "ave(X)", zout,zout) 67 70 c 68 71 CALL histdef(nid_mthnmc, "ua", 69 72 . "Eastward wind","m s-1", 70 73 . iim,jj_nb,nhori, nlevSTD,1,nlevSTD, nvert, 32, 71 . " inst(X)", zout,zout)74 . "ave(X)", zout,zout) 72 75 c 73 76 CALL histdef(nid_mthnmc, "va", 74 77 . "Northward wind","m s-1", 75 78 . iim,jj_nb,nhori, nlevSTD,1,nlevSTD, nvert, 32, 76 . " inst(X)", zout,zout)79 . "ave(X)", zout,zout) 77 80 c 78 81 CALL histdef(nid_mthnmc, "wap", 79 82 . "Lagrangian tendency of air pressure","Pa s-1", 80 83 . iim,jj_nb,nhori, nlevSTD,1,nlevSTD, nvert, 32, 81 . " inst(X)", zout,zout)84 . "ave(X)", zout,zout) 82 85 c 83 86 CALL histdef(nid_mthnmc, "psbg", 84 87 . "Pressure sfce below ground","%", 85 88 . iim,jj_nb,nhori, nlevSTD,1,nlevSTD, nvert, 32, 86 . " inst(X)", zout,zout)89 . "ave(X)", zout,zout) 87 90 c 88 91 CALL histdef(nid_mthnmc, "uv", 89 92 . "uv ", 90 93 . "m2/s2",iim,jj_nb,nhori, nlevSTD,1,nlevSTD, nvert, 32, 91 . " inst(X)", zout,zout)94 . "ave(X)", zout,zout) 92 95 c 93 96 CALL histdef(nid_mthnmc, "vq", … … 95 98 . "m/s * (kg/kg)",iim,jj_nb,nhori, 96 99 . nlevSTD,1,nlevSTD, nvert, 32, 97 . " inst(X)", zout,zout)100 . "ave(X)", zout,zout) 98 101 c 99 102 CALL histdef(nid_mthnmc, "vT", … … 101 104 . "mK/s",iim,jj_nb,nhori, 102 105 . nlevSTD,1,nlevSTD, nvert, 32, 103 . " inst(X)", zout,zout)106 . "ave(X)", zout,zout) 104 107 c 105 108 CALL histdef(nid_mthnmc, "wq", … … 107 110 . "(Pa/s)*(kg/kg)",iim,jj_nb,nhori, 108 111 . nlevSTD,1,nlevSTD, nvert, 32, 109 . " inst(X)", zout,zout)112 . "ave(X)", zout,zout) 110 113 c 111 114 CALL histdef(nid_mthnmc, "vphi", … … 113 116 . "m2/s",iim,jj_nb,nhori, 114 117 . nlevSTD,1,nlevSTD, nvert, 32, 115 . " inst(X)", zout,zout)118 . "ave(X)", zout,zout) 116 119 c 117 120 CALL histdef(nid_mthnmc, "wT", … … 119 122 . "K*Pa/s",iim,jj_nb,nhori, 120 123 . nlevSTD,1,nlevSTD, nvert, 32, 121 . " inst(X)", zout,zout)124 . "ave(X)", zout,zout) 122 125 c 123 126 CALL histdef(nid_mthnmc, "uxu", … … 125 128 . "m2/s2",iim,jj_nb,nhori, 126 129 . nlevSTD,1,nlevSTD, nvert, 32, 127 . " inst(X)", zout,zout)130 . "ave(X)", zout,zout) 128 131 c 129 132 CALL histdef(nid_mthnmc, "vxv", … … 131 134 . "m2/s2",iim,jj_nb,nhori, 132 135 . nlevSTD,1,nlevSTD, nvert, 32, 133 . " inst(X)", zout,zout)136 . "ave(X)", zout,zout) 134 137 c 135 138 CALL histdef(nid_mthnmc, "TxT", … … 137 140 . "K2",iim,jj_nb,nhori, 138 141 . nlevSTD,1,nlevSTD, nvert, 32, 139 . " inst(X)", zout,zout)142 . "ave(X)", zout,zout) 140 143 c 141 144 CALL histdef(nid_mthnmc, "tro3", 145 . "Ozone mole fraction", 146 . "1e-9",iim,jj_nb,nhori, 147 . nlevSTD,1,nlevSTD, nvert, 32, 148 . "ave(X)", zout,zout) 149 c 150 if (read_climoz == 2) THEN 151 CALL histdef(nid_mthnmc, "tro3_daylight", 152 . "Daylight ozone mole fraction", 153 . "1e-9",iim,jj_nb,nhori, 154 . nlevSTD,1,nlevSTD, nvert, 32, 155 . "ave(X)", zout,zout) 156 endif 157 c 142 158 CALL histend(nid_mthnmc) 143 159 c
Note: See TracChangeset
for help on using the changeset viewer.