source: trunk/WRF.COMMON/WRFV3/test/nmm_real/tomorrow

Last change on this file was 2759, checked in by aslmd, 2 years ago

adding unmodified code from WRFV3.0.1.1, expurged from useless data +1M size

  • Property svn:executable set to *
File size: 1.4 KB
Line 
1#!/bin/ksh -f
2
3yy=`expr $1 / 10000`
4mm=`expr $1 - $yy * 10000`
5mm=`expr $mm / 100`
6dd=`expr $1 % 100`
7
8
9yy=`expr $yy + 0`
10mm=`expr $mm + 0`
11dd=`expr $dd + 0`
12
13if [ $yy -lt 10 ] ; then
14yy=0$yy
15fi
16
17if [ $mm -lt 10 ] ; then
18mm=0$mm
19fi
20
21if [ $dd -lt 10 ] ; then
22dd=0$dd
23fi
24
25# exit
26
27if [ $mm -eq 1 -or $mm -eq 01 ] 
28then
29mxd=31
30fi
31
32if [ $mm -eq 2 -o $mm -eq 02 ]
33then
34   leap=`expr $yy % 4`
35    if [ $leap -eq 0 ]
36    then
37    mxd=29
38    fi
39    if [ $leap -ne 0 ]
40    then
41    mxd=28
42    fi
43fi
44
45
46if [ $mm -eq 3 -o $mm -eq 03 ] ; then
47mxd=31
48fi
49
50if [ $mm -eq 4 -o $mm -eq 04 ] ; then
51mxd=30
52fi
53
54if [ $mm -eq 5 -o $mm -eq 05 ] ; then
55mxd=31
56fi
57
58if [ $mm -eq 6 -o $mm -eq 06 ] ; then
59mxd=30
60fi
61
62if [ $mm -eq 7 -o $mm -eq 07 ] ; then
63mxd=31
64fi
65
66if [ $mm -eq 8 -o $mm -eq 08 ] ; then
67mxd=31
68fi
69
70if [ $mm -eq 9 -o $mm -eq 09 ] ; then
71mxd=30
72fi
73
74if [ $mm -eq 10 ] ; then
75mxd=31
76fi
77
78if [ $mm -eq 11 ] ; then
79mxd=30
80fi
81
82if [ $mm -eq 12 ] ; then
83mxd=31
84fi
85# echo "max days in month: " $mxd
86dd=`expr $dd + 1`
87
88# echo "new dd: " $dd
89
90if [ $dd -gt $mxd ]
91then
92    mm=`expr $mm + 1`
93    if [ $mm -eq 13 ]
94        then
95        yy=`expr $yy + 1`
96        mm=1
97    fi
98    dd=1
99fi
100yy=`expr $yy + 0`
101mm=`expr $mm + 0`
102dd=`expr $dd + 0`
103
104if [ $yy -lt 10 ] ; then
105yy=0$yy
106fi
107
108if [ $mm -lt 10 ] ; then
109mm=0$mm
110fi
111
112if [ $dd -lt 10 ] ; then
113dd=0$dd
114fi
115
116# echo "now have yy mm dd: " $yy $mm $dd
117
118ymd=${yy}${mm}${dd}
119
120echo $ymd
121
Note: See TracBrowser for help on using the repository browser.