reinit
*THIS SCRIPT IS TO DISPLAY 3 MAPS OF SOIL MOISTURE 1m, 0.2m and ratio 0.2m/1m 
open  grd.n100.ctl
open  grd.n10.ctl
open  grd.r10.ctl
open mask.ctl
define ocean=mask.4(t=1)
set display color white
c
* &0 = time step number (2-73)
* &1 = January,..., December
* &2 = 8,18 or 28
* &3 = year 78,79,...,85
*enable print pr3.&0.gx
set vpage 0 8.5 6.8 11
set parea 1 8 0.85 3.2
exec setp100
set mpdset hires
set grads off
set lon 20 140
set lat 34 70
set t &0 
set gxout shaded
set cterp on
d n100
set gxout contour
set cmark 0
set cthick 2
set dignum 0
set ccolor 1
set cstyle 1
set cthick 4
set cint 5
set cmin 5
set cterp on
set csmooth on
set clab on
d n100
exec barp100
*************************************
*maskout ocean points
set gxout fgrid
set fgvals 1 0
d ocean
draw title PLANT AVAILABLE SOIL MOISTURE (CM)\Natural vegetation. &1 &2, 19&3\Upper 100 cm soil layer
** ** **
set vpage 0 8.5 3.4 11
set parea 1 8 0.85 3.2
set mpdset hires
set grads off
set lon 20 140
set lat 34 70
set t &0
exec setp10
set gxout shaded
set cterp on
d n10.2
set gxout contour
set cmark 0
set cthick 2
set dignum 0
set ccolor 1
set cstyle 1
set cthick 4
set cint 0.5
set cmin 0.5
set cterp on
set csmooth on
set clab on
d n10.2
exec barp10
*************************************
*maskout ocean points
set gxout fgrid
set fgvals 1 0
d ocean
draw title \\Upper 10 cm soil layer
set vpage 0 8.5 0 11
set parea 1 8 0.85 3.2
set mpdset hires
set grads off
set lon 20 140
set lat 34 70
set t &0
exec setpr
set gxout shaded
set cterp on
d (100*r10.3)
set gxout contour
set cmark 0
set cthick 2
set dignum 0
set ccolor 1
set cstyle 1
set cthick 4
set cint 5
set cmin 5
set cterp on
set csmooth on
set clab on
d (100*r10.3)
exec barpr
*************************************
*maskout ocean points
set gxout fgrid
set fgvals 1 0
d ocean
draw title \\Ratio (%) of available water in 10 cm and 100 cm layers
*print
*disable print
**********************************************************

*exec mpc3 2 January 8 78
*exec mpc3 3 January 18 78
*exec mpc3 4 January 28 78
*exec mpc3 5 February 8 78
*exec mpc3 6 February 18 78
*exec mpc3 7 February 28 78
*exec mpc3 8 March 8 78
*exec mpc3 9 March 18 78
*exec mpc3 10 March 28 78
*exec mpc3 11 April 8 78
*exec mpc3 12 April 18 78
*exec mpc3 13 April 28 78
*exec mpc3 14 May 8 78
*exec mpc3 15 May 18 78
*exec mpc3 16 May 28 78
*exec mpc3 17 June 8 78
*exec mpc3 18 June 18 78
*exec mpc3 19 June 28 78
*exec mpc3 20 July 8 78
*exec mpc3 21 July 18 78
*exec mpc3 22 July 28 78
*exec mpc3 23 August 8 78
*exec mpc3 24 August 18 78
*exec mpc3 25 August 28 78
*exec mpc3 26 September 8 78
*exec mpc3 27 September 18 78
*exec mpc3 28 September 28 78
*exec mpc3 29 October 8 78
*exec mpc3 30 October 18 78
*exec mpc3 31 October 28 78
*exec mpc3 32 November 8 78
*exec mpc3 33 November 18 78
*exec mpc3 34 November 28 78
*exec mpc3 35 December 8 78
*exec mpc3 36 December 18 78
*exec mpc3 37 December 28 78


*exec mpc3 38 January 8 79
*exec mpc3 39 January 18 79
*exec mpc3 40 January 28 79
*exec mpc3 41 February 8 79
*exec mpc3 42 February 18 79
*exec mpc3 43 February 28 79
*exec mpc3 44 March 8 79
*exec mpc3 45 March 18 79
*exec mpc3 46 March 28 79
*exec mpc3 47 April 8 79
*exec mpc3 48 April 18 79
*exec mpc3 49 April 28 79
*exec mpc3 50 May 8 79
*exec mpc3 51 May 18 79
*exec mpc3 52 May 28 79
*exec mpc3 52 June 8 79
*exec mpc3 54 June 18 79
*exec mpc3 55 June 28 79
*exec mpc3 56 July 8 79
*exec mpc3 57 July 18 79
*exec mpc3 58 July 28 78
*exec mpc3 59 August 8 79
*exec mpc3 60 August 18 79
*exec mpc3 61 August 28 79
*exec mpc3 62 September 8 79
*exec mpc3 63 September 18 79
*exec mpc3 64 September 28 79
*exec mpc3 65 October 8 79
*exec mpc3 66 October 18 79
*exec mpc3 67 October 28 79
*exec mpc3 68 November 8 79
*exec mpc3 69 November 18 79
*exec mpc3 70 November 28 79
*exec mpc3 71 December 8 79
*exec mpc3 72 December 18 79
*exec mpc3 73 December 28 79
**********************************************************

*exec mpc3 74 January 8 80
*exec mpc3 75 January 18 80
*exec mpc3 76 January 28 80
*exec mpc3 77 February 8 80
*exec mpc3 78 February 18 80
*exec mpc3 79 February 28 80
*exec mpc3 80 March 8 80
*exec mpc3 81 March 18 80
*exec mpc3 82 March 28 80
*exec mpc3 83 April 8 80
*exec mpc3 84 April 18 80
*exec mpc3 85 April 28 80
*exec mpc3 86 May 8 80
*exec mpc3 87 May 18 80
*exec mpc3 88 May 28 80
*exec mpc3 89 June 8 80
*exec mpc3 90 June 18 80
*exec mpc3 91 June 28 80
*exec mpc3 92 July 8 80
*exec mpc3 93 July 18 80
*exec mpc3 94 July 28 80
*exec mpc3 95 August 8 80
*exec mpc3 96 August 18 80
*exec mpc3 97 August 28 80
*exec mpc3 98 September 8 80
*exec mpc3 99 September 18 80
*exec mpc3 100 September 28 80
*exec mpc3 101 October 8 80
*exec mpc3 102 October 18 80
*exec mpc3 103 October 28 80
*exec mpc3 104 November 8 80
*exec mpc3 105 November 18 80
*exec mpc3 106 November 28 80
*exec mpc3 107 December 8 80
*exec mpc3 108 December 18 80
*exec mpc3 109 December 28 80

*exec mpc3 110 January 8 81
*exec mpc3 111 January 18 81
*exec mpc3 112 January 28 81
*exec mpc3 113 February 8 81
*exec mpc3 114 February 18 81
*exec mpc3 115 February 28 81
*exec mpc3 116 March 8 81
*exec mpc3 117 March 18 81
*exec mpc3 118 March 28 81
*exec mpc3 119 April 8 81
*exec mpc3 120 April 18 81
*exec mpc3 121 April 28 81
*exec mpc3 122 May 8 81
*exec mpc3 123 May 18 81
*exec mpc3 124 May 28 81
*exec mpc3 125 June 8 81
*exec mpc3 126 June 18 81
*exec mpc3 127 June 28 81
*exec mpc3 128 July 8 81
*exec mpc3 129 July 18 81
*exec mpc3 130 July 28 81
*exec mpc3 131 August 8 81
*exec mpc3 132 August 18 81
*exec mpc3 133 August 28 81
*exec mpc3 134 September 8 81
*exec mpc3 135 September 18 81
*exec mpc3 136 September 28 81
*exec mpc3 137 October 8 81
*exec mpc3 138 October 18 81
*exec mpc3 139 October 28 81
*exec mpc3 140 November 8 81
*exec mpc3 141 November 18 81
*exec mpc3 142 November 28 81
*exec mpc3 143 December 8 81
*exec mpc3 144 December 18 81
*exec mpc3 145 December 28 81

*exec mpc3 146 January 8 82
*exec mpc3 147 January 18 82
*exec mpc3 148 January 28 82
*exec mpc3 149 February 8 82
*exec mpc3 150 February 18 82
*exec mpc3 151 February 28 82
*exec mpc3 152 March 8 82
*exec mpc3 153 March 18 82
*exec mpc3 154 March 28 82
*exec mpc3 155 April 8 82
*exec mpc3 156 April 18 82
*exec mpc3 157 April 28 82
*exec mpc3 158 May 8 82
*exec mpc3 159 May 18 82
*exec mpc3 160 May 28 82
*exec mpc3 161 June 8 82
*exec mpc3 162 June 18 82
*exec mpc3 163 June 28 82
*exec mpc3 164 July 8 82
*exec mpc3 165 July 18 82
*exec mpc3 166 July 28 82
*exec mpc3 167 August 8 82
*exec mpc3 168 August 18 82
*exec mpc3 169 August 28 82
*exec mpc3 170 September 8 82
*exec mpc3 171 September 18 82
*exec mpc3 172 September 28 82
*exec mpc3 173 October 8 82
*exec mpc3 174 October 18 82
*exec mpc3 175 October 28 82
*exec mpc3 176 November 8 82
*exec mpc3 177 November 18 82
*exec mpc3 178 November 28 82
*exec mpc3 179 December 8 82
*exec mpc3 180 December 18 82
*exec mpc3 181 December 28 82

*exec mpc3 182 January 8 83
*exec mpc3 183 January 18 83
*exec mpc3 184 January 28 83
*exec mpc3 185 February 8 83
*exec mpc3 186 February 18 83
*exec mpc3 187 February 28 83
*exec mpc3 188 March 8 83
*exec mpc3 189 March 18 83
*exec mpc3 190 March 28 83
*exec mpc3 191 April 8 83
*exec mpc3 192 April 18 83
*exec mpc3 193 April 28 83
*exec mpc3 194 May 8 83
*exec mpc3 195 May 18 83
*exec mpc3 196 May 28 83
*exec mpc3 197 June 8 83
*exec mpc3 198 June 18 83
*exec mpc3 199 June 28 83
*exec mpc3 200 July 8 83
*exec mpc3 201 July 18 83
*exec mpc3 202 July 28 83
*exec mpc3 203 August 8 83
*exec mpc3 204 August 18 83
*exec mpc3 205 August 28 83
*exec mpc3 206 September 8 83
*exec mpc3 207 September 18 83
*exec mpc3 208 September 28 83
*exec mpc3 209 October 8 83
*exec mpc3 210 October 18 83
*exec mpc3 211 October 28 83
*exec mpc3 212 November 8 83
*exec mpc3 213 November 18 83
*exec mpc3 214 November 28 83
*exec mpc3 215 December 8 83
*exec mpc3 216 December 18 83
*exec mpc3 217 December 28 83

*exec mpc3 218 January 8 84
*exec mpc3 219 January 18 84
*exec mpc3 220 January 28 84
*exec mpc3 221 February 8 84
*exec mpc3 222 February 18 84
*exec mpc3 223 February 28 84
*exec mpc3 224 March 8 84
*exec mpc3 225 March 18 84
*exec mpc3 226 March 28 84
*exec mpc3 227 April 8 84
*exec mpc3 228 April 18 84
*exec mpc3 229 April 28 84
*exec mpc3 230 May 8 84
*exec mpc3 231 May 18 84
*exec mpc3 232 May 28 84
*exec mpc3 233 June 8 84
*exec mpc3 234 June 18 84
*exec mpc3 235 June 28 84
*exec mpc3 236 July 8 84
*exec mpc3 237 July 18 84
*exec mpc3 238 July 28 84
*exec mpc3 239 August 8 84
*exec mpc3 240 August 18 84
*exec mpc3 241 August 28 84
*exec mpc3 242 September 8 84
*exec mpc3 243 September 18 84
*exec mpc3 244 September 28 84
*exec mpc3 245 October 8 84
*exec mpc3 246 October 18 84
*exec mpc3 247 October 28 84
*exec mpc3 248 November 8 84
*exec mpc3 249 November 18 84
*exec mpc3 250 November 28 84
*exec mpc3 251 December 8 84
*exec mpc3 252 December 18 84
*exec mpc3 253 December 28 84

*exec mpc3 254 January 8 85
*exec mpc3 255 January 18 85
*exec mpc3 256 January 28 85
*exec mpc3 257 February 8 85
*exec mpc3 258 February 18 85
*exec mpc3 259 February 28 85
*exec mpc3 260 March 8 85
*exec mpc3 261 March 18 85
*exec mpc3 262 March 28 85
*exec mpc3 263 April 8 85
*exec mpc3 264 April 18 85
*exec mpc3 265 April 28 85
*exec mpc3 266 May 8 85
*exec mpc3 267 May 18 85
*exec mpc3 268 May 28 85
*exec mpc3 269 June 8 85
*exec mpc3 270 June 18 85
*exec mpc3 271 June 28 85
*exec mpc3 272 July 8 85
*exec mpc3 273 July 18 85
*exec mpc3 274 July 28 85
*exec mpc3 275 August 8 85
*exec mpc3 276 August 18 85
*exec mpc3 277 August 28 85
*exec mpc3 278 September 8 85
*exec mpc3 279 September 18 85
*exec mpc3 280 September 28 85
*exec mpc3 281 October 8 85
*exec mpc3 282 October 18 85
*exec mpc3 283 October 28 85
*exec mpc3 284 November 8 85
*exec mpc3 285 November 18 85
*exec mpc3 286 November 28 85
*exec mpc3 287 December 8 85
*exec mpc3 288 December 18 85
*exec mpc3 289 December 28 85