forked from lzhenn/easy-wrf-trck
-
Notifications
You must be signed in to change notification settings - Fork 0
/
run_gba_d01.py
executable file
·187 lines (133 loc) · 6.25 KB
/
run_gba_d01.py
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
#/usr/bin/env python3
'''
Date: Aug 28, 2020
Main script to drive the easy-wrf-trac model
Zhenning LI
'''
import numpy as np
import pandas as pd
import lib.preprocess_wrfinp, lib.air_parcel
from lib.cfgparser import read_cfg
import core.lagrange
import os, time
from multiprocessing import Pool, sharedctypes
def lag_run_seriel(itsk, airp_lst, u4d, v4d, w4d, z4d, lat2d, lon2d, dts, inpf_per_dt, final_t):
"""
Lagrangian run function for seriel
"""
start = time.time()
while(airp_lst[0].t[-1] < final_t): # not reach the final step
# ***Elemental Operation of Lagrangian Model***
# update global idt
idt=int(round((len(airp_lst[0].t)-1)/inpf_per_dt,0))
curr_t=airp_lst[0].t[-1].strftime('%Y-%m-%d %H:%M:%S')
print('TASK[%02d]: Lagrangian Run at %s' % ( itsk, curr_t))
for airp in airp_lst:
# resolve ix iy iz for the last (T+0) move
core.lagrange.resolve_curr_xyz(airp, lat2d, lon2d, z4d[idt,:,:,:])
idz=airp.iz[-1]
idx=airp.ix[-1]
idy=airp.iy[-1]
# march all parcels (T+1)
core.lagrange.lagrange_march(airp, u4d[idt,idz,idx,idy], v4d[idt,idz,idx,idy], w4d[idt, idz,idx,idy], dts)
end = time.time()
print('TASK[%02d] END: Lagrangian Run at %s, used %0.3f seconds' % (itsk, curr_t, (end - start)))
def lag_run_mtsk(itsk, airp_lst, dts, inpf_per_dt, final_t):
"""
Lagrangian run function for multiple processors
"""
start = time.time()
u4d = np.ctypeslib.as_array(s_u4d)
v4d = np.ctypeslib.as_array(s_v4d)
w4d = np.ctypeslib.as_array(s_w4d)
z4d = np.ctypeslib.as_array(s_z4d)
lat2d = np.ctypeslib.as_array(s_lat2d)
lon2d = np.ctypeslib.as_array(s_lon2d)
while(airp_lst[0].t[-1] < final_t): # not reach the final step
# ***Elemental Operation of Lagrangian Model***
# update global idt
idt=int(round((len(airp_lst[0].t)-1)/inpf_per_dt,0))
curr_t=airp_lst[0].t[-1].strftime('%Y-%m-%d %H:%M:%S')
print('TASK[%02d]: Lagrangian Run at %s' % ( itsk, curr_t))
for airp in airp_lst:
# resolve ix iy iz for the last (T+0) move
core.lagrange.resolve_curr_xyz(airp, lat2d, lon2d, z4d[idt,:,:,:])
idz=airp.iz[-1]
idx=airp.ix[-1]
idy=airp.iy[-1]
# march all parcels (T+1)
core.lagrange.lagrange_march(airp, u4d[idt,idz,idx,idy], v4d[idt,idz,idx,idy], w4d[idt, idz,idx,idy], dts)
end = time.time()
print('TASK[%02d] END: Lagrangian Run at %s, used %0.3f seconds' % (itsk, curr_t, (end - start)))
return airp_lst
def create_share_type(np_array):
np_carr = np.ctypeslib.as_ctypes(np_array)
shared_array = sharedctypes.Array(np_carr._type_, np_carr, lock=False)
return shared_array
def _init(shared_u4d, shared_v4d, shared_w4d, shared_z4d, shared_lat2d, shared_lon2d):
""" Each pool process calls this initializer. Load the array to be populated into that process's global namespace """
global s_u4d, s_v4d, s_w4d, s_z4d, s_lat2d, s_lon2d
s_u4d=shared_u4d
s_v4d=shared_v4d
s_w4d=shared_w4d
s_z4d=shared_z4d
s_lat2d=shared_lat2d
s_lon2d=shared_lon2d
def main_run():
itsk=0
print('Easy WRF Trac Start...')
print('Read Config...')
cfg_hdl=read_cfg('./conf/config_gba_d01.ini')
print('Init Fields...')
fields_hdl=lib.preprocess_wrfinp.wrf_acc_fields(cfg_hdl)
print('Construct Input Air Parecels...')
air_in_fhdl=pd.read_csv('./input/input_GBA_d01.csv', names=['idx','lat0', 'lon0', 'h0'], index_col='idx')
airp_lst=[] # all traced air parcel packaged into a list
for row in air_in_fhdl.itertuples():
airp_lst.append(lib.air_parcel.air_parcel(row.Index,row.lat0, row.lon0, row.h0, cfg_hdl, fields_hdl.strt_t))
print('CORE Procedure: Lagrangian Tracing...')
# ------Prepare inital parameters---
idt=0 # initial timeframe
inpf_per_dt=int(cfg_hdl['INPUT']['input_file_dt'])/int(cfg_hdl['CORE']['time_step']) # calculate input file frq per integ dt
dts=airp_lst[0].dt.total_seconds() # dt in seconds
ntasks=int(cfg_hdl['CORE']['ntasks'])
# Whether multiplethreading would be used
if len(airp_lst) > 1000:
print('Master process %s.' % os.getpid())
# Initial shared data
shared_u4d = create_share_type(fields_hdl.U.values)
shared_v4d = create_share_type(fields_hdl.V.values)
shared_w4d = create_share_type(fields_hdl.W.values)
shared_z4d = create_share_type(fields_hdl.Z.values)
shared_lat2d = create_share_type(fields_hdl.xlat.values)
shared_lon2d = create_share_type(fields_hdl.xlon.values)
# start process pool
process_pool = Pool(processes=ntasks, initializer=_init, initargs=(shared_u4d, shared_v4d,
shared_w4d, shared_z4d, shared_lat2d, shared_lon2d,))
len_airp=len(airp_lst)
len_per_task=len_airp//ntasks
results = []
# open tasks ID 0 to ntasks-2
for itsk in range(ntasks-1):
results.append(process_pool.apply_async(lag_run_mtsk,args=(itsk, airp_lst[itsk*len_per_task:(itsk+1)*len_per_task], dts, inpf_per_dt, fields_hdl.final_t,)))
# open ID ntasks-1 in case of residual
results.append(process_pool.apply_async(lag_run_mtsk, args=(ntasks-1, airp_lst[(ntasks-1)*len_per_task:], dts,inpf_per_dt, fields_hdl.final_t,)))
print('Waiting for all subprocesses done...')
process_pool.close()
process_pool.join()
# reorg airp objs list
airp_lst=[]
for res in results:
airp_lst.extend(res.get())
print('All subprocesses done.')
else:
u4d=fields_hdl.U.values
v4d=fields_hdl.V.values
w4d=fields_hdl.W.values
z4d=fields_hdl.Z.values
lag_run_seriel(0, airp_lst, u4d, v4d, w4d, z4d, fields_hdl.xlat.values, fields_hdl.xlon.values, dts, inpf_per_dt, fields_hdl.final_t)
# end if <Muiltiple, Seriel>
print('Output...')
lib.air_parcel.acc_output(airp_lst, 5000, cfg_hdl, prefix='gba.d01.')
if __name__=='__main__':
main_run()