-
Notifications
You must be signed in to change notification settings - Fork 24
New issue
Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.
By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.
Already on GitHub? Sign in to your account
Bugfix 1715 pb2nc seg fault with pbl 91 #1718
Changes from 3 commits
05720fb
eeb6a57
25d4dc2
efc0598
b394068
File filter
Filter by extension
Conversations
Jump to
Diff view
Diff view
There are no files selected for viewing
Original file line number | Diff line number | Diff line change | ||||
---|---|---|---|---|---|---|
|
@@ -2930,39 +2930,65 @@ int combine_tqz_and_uv(map<float, float*> pqtzuv_map_tq, | |||||
float *pqtzuv_tq, *pqtzuv_uv; | ||||||
float *pqtzuv_merged = (float *) 0; | ||||||
float *next_pqtzuv, *prev_pqtzuv; | ||||||
float tq_pres_max, tq_pres_min, uv_pres_max, uv_pres_min; | ||||||
std::map<float,float*>::iterator it, it_tq, it_uv; | ||||||
|
||||||
// Gets pressure levels for TQZ records | ||||||
for (it=pqtzuv_map_tq.begin(); it!=pqtzuv_map_tq.end(); ++it) { | ||||||
tq_levels.add(int(it->first)); | ||||||
it = pqtzuv_map_tq.begin(); | ||||||
tq_pres_min = tq_pres_max = it->first; | ||||||
for (; it!=pqtzuv_map_tq.end(); ++it) { | ||||||
float pres_v = it->first; | ||||||
if (tq_pres_min > pres_v) tq_pres_min = pres_v; | ||||||
if (tq_pres_max < pres_v) tq_pres_max = pres_v; | ||||||
tq_levels.add(nint(pres_v)); | ||||||
} | ||||||
// Gets pressure levels for common records | ||||||
for (it=pqtzuv_map_uv.begin(); it!=pqtzuv_map_uv.end(); ++it) { | ||||||
if (tq_levels.has(int(it->first))) { | ||||||
common_levels.add(int(it->first)); | ||||||
it = pqtzuv_map_uv.begin(); | ||||||
uv_pres_min = uv_pres_max = it->first; | ||||||
for (; it!=pqtzuv_map_uv.end(); ++it) { | ||||||
float pres_v = it->first; | ||||||
if (uv_pres_min > pres_v) uv_pres_min = pres_v; | ||||||
if (uv_pres_max < pres_v) uv_pres_max = pres_v; | ||||||
if (tq_levels.has(nint(pres_v))) { | ||||||
common_levels.add(nint(pres_v)); | ||||||
} | ||||||
} | ||||||
|
||||||
if(mlog.verbosity_level() >= PBL_DEBUG_LEVEL) { | ||||||
log_tqz_and_uv(pqtzuv_map_tq, pqtzuv_map_uv, method_name); | ||||||
} | ||||||
|
||||||
bool no_overlap = (tq_pres_max < uv_pres_min) || (tq_pres_min > uv_pres_max); | ||||||
mlog << Debug(6) << method_name << "TQZ pressures: " << tq_pres_max | ||||||
<< " to " << tq_pres_min << " UV pressures: " << uv_pres_max | ||||||
<< " to " << uv_pres_min << (no_overlap ? " no overlap!" : " overlapping") << "\n"; | ||||||
if( no_overlap ) { | ||||||
mlog << Warning << method_name | ||||||
<< "Can not combine TQ and UV records because of no overlapping.\n"; | ||||||
There was a problem hiding this comment. Choose a reason for hiding this commentThe reason will be displayed to describe this comment to others. Learn more.
Suggested change
|
||||||
mlog << Warning << " TQZ record count: " << tq_count | ||||||
There was a problem hiding this comment. Choose a reason for hiding this commentThe reason will be displayed to describe this comment to others. Learn more.
Suggested change
|
||||||
<< ", UV record count: " << uv_count | ||||||
<< " common_levels: " << common_levels.n() << "\n"; | ||||||
There was a problem hiding this comment. Choose a reason for hiding this commentThe reason will be displayed to describe this comment to others. Learn more.
Suggested change
|
||||||
return pqtzuv_map_merged.size(); | ||||||
} | ||||||
|
||||||
// Select first record by 1) merging two records with the same pressure | ||||||
// level or 2) interpolate | ||||||
int tq_pres, uv_pres; | ||||||
next_pqtzuv = (float *)0; | ||||||
it_tq = pqtzuv_map_tq.begin(); | ||||||
it_uv = pqtzuv_map_uv.begin(); | ||||||
pqtzuv_tq = (float *)it_tq->second; | ||||||
pqtzuv_uv = (float *)it_uv->second;; | ||||||
pqtzuv_merged = new float[mxr8vt]; | ||||||
if (common_levels.has(int(it_tq->first)) | ||||||
|| common_levels.has(int(it_uv->first))) { | ||||||
tq_pres = nint(it_tq->first); | ||||||
uv_pres = nint(it_uv->first); | ||||||
if (common_levels.has(tq_pres) || common_levels.has(uv_pres)) { | ||||||
// Found the records with the same precsure level | ||||||
if (it_tq->first != it_uv->first) { | ||||||
if (common_levels.has(int(it_uv->first))) { | ||||||
if (tq_pres != uv_pres) { | ||||||
if (common_levels.has(uv_pres)) { | ||||||
pqtzuv_uv = pqtzuv_map_uv[it_uv->first]; | ||||||
} | ||||||
else if (common_levels.has(int(it_tq->first))) { | ||||||
else if (common_levels.has(tq_pres)) { | ||||||
pqtzuv_tq = pqtzuv_map_tq[it_tq->first]; | ||||||
} | ||||||
} | ||||||
|
@@ -2978,7 +3004,7 @@ int combine_tqz_and_uv(map<float, float*> pqtzuv_map_tq, | |||||
prev_pqtzuv = (float *)it_uv->second; | ||||||
++it_uv; | ||||||
} | ||||||
next_pqtzuv = it_uv->second; | ||||||
next_pqtzuv = (float *)it_uv->second; | ||||||
} | ||||||
else { | ||||||
//Interpolate TQZ into UV | ||||||
|
@@ -2988,8 +3014,9 @@ int combine_tqz_and_uv(map<float, float*> pqtzuv_map_tq, | |||||
prev_pqtzuv = (float *)it_tq->second; | ||||||
++it_tq; | ||||||
} | ||||||
next_pqtzuv = it_tq->second; | ||||||
next_pqtzuv = (float *)it_tq->second; | ||||||
} | ||||||
// Interpolate TQZ and UV as the first pressure level | ||||||
interpolate_pqtzuv(prev_pqtzuv, pqtzuv_merged, next_pqtzuv); | ||||||
} | ||||||
float first_pres = (pqtzuv_merged == 0 ? bad_data_float : pqtzuv_merged[0]); | ||||||
|
@@ -3006,6 +3033,7 @@ int combine_tqz_and_uv(map<float, float*> pqtzuv_map_tq, | |||||
if(mlog.verbosity_level() >= PBL_DEBUG_LEVEL) { | ||||||
log_merged_tqz_uv(pqtzuv_map_tq, pqtzuv_map_uv, pqtzuv_map_merged, method_name); | ||||||
} | ||||||
delete [] pqtzuv_merged; | ||||||
} | ||||||
|
||||||
return pqtzuv_map_merged.size(); | ||||||
|
@@ -3058,7 +3086,7 @@ float compute_pbl(map<float, float*> pqtzuv_map_tq, | |||||
pbl_data_vgrd[index] = pqtzuv[5]; | ||||||
if (!is_eq(pbl_data_spfh[index], bad_data_float)) spfh_cnt++; | ||||||
if (!is_eq(pbl_data_hgt[index], bad_data_float)) hgt_cnt++; | ||||||
selected_levels.add(int(it->first)); | ||||||
selected_levels.add(nint(it->first)); | ||||||
} | ||||||
|
||||||
index--; | ||||||
|
@@ -3080,7 +3108,7 @@ float compute_pbl(map<float, float*> pqtzuv_map_tq, | |||||
if (!is_eq(highest_pressure, bad_data_float)) { | ||||||
index = MAX_PBL_LEVEL - 1; | ||||||
for (; it!=pqtzuv_map_tq.end(); ++it) { | ||||||
int pres_level = int(it->first); | ||||||
int pres_level = nint(it->first); | ||||||
if (selected_levels.has(pres_level)) break; | ||||||
|
||||||
float *pqtzuv = pqtzuv_map_merged[it->first]; | ||||||
|
@@ -3202,9 +3230,14 @@ int interpolate_by_pressure(int length, float *pres_data, float *var_data) { | |||||
<< var_data[idx_start] << " and " << var_data[idx_end] << "\n"; | ||||||
float data_diff = var_data[idx_end] - var_data[idx_start]; | ||||||
for (idx2 = idx_start+1; idx2<idx_end; idx2++) { | ||||||
float pres_ratio = (pres_data[idx2] - pres_data[idx_start]) | ||||||
/ (pres_data[idx_end] - pres_data[idx_start]); | ||||||
var_data[idx2] = var_data[idx_start] + (data_diff * pres_ratio); | ||||||
if (!is_eq(pres_data[idx_end], pres_data[idx_start])) { | ||||||
float pres_ratio = (pres_data[idx2] - pres_data[idx_start]) | ||||||
/ (pres_data[idx_end] - pres_data[idx_start]); | ||||||
var_data[idx2] = var_data[idx_start] + (data_diff * pres_ratio); | ||||||
} | ||||||
else { | ||||||
var_data[idx2] = var_data[idx_start]; | ||||||
} | ||||||
mlog << Debug(7) << method_name << " interpolated value[" | ||||||
<< idx2 << "] = " << var_data[idx2] << "\n"; | ||||||
count_interpolated++; | ||||||
|
@@ -3229,11 +3262,13 @@ int interpolate_by_pressure(int length, float *pres_data, float *var_data) { | |||||
void interpolate_pqtzuv(float *prev_pqtzuv, float *cur_pqtzuv, float *next_pqtzuv) { | ||||||
static const char *method_name = "interpolate_pqtzuv() "; | ||||||
|
||||||
if ((prev_pqtzuv[0] == cur_pqtzuv[0]) || (next_pqtzuv[0] == cur_pqtzuv[0])) { | ||||||
if ((nint(prev_pqtzuv[0]) == nint(cur_pqtzuv[0])) | ||||||
|| (nint(next_pqtzuv[0]) == nint(cur_pqtzuv[0])) | ||||||
|| (nint(prev_pqtzuv[0]) == nint(next_pqtzuv[0]))) { | ||||||
mlog << Error << method_name | ||||||
There was a problem hiding this comment. Choose a reason for hiding this commentThe reason will be displayed to describe this comment to others. Learn more.
Suggested change
|
||||||
<< " Can't interpolate because of same pressure levels. prev: " | ||||||
<< prev_pqtzuv[0] << ", cur: " << cur_pqtzuv[0] | ||||||
<< ", next: " << prev_pqtzuv[0] << "\n"; | ||||||
<< " Can't interpolate because of same pressure levels. prev: " | ||||||
<< prev_pqtzuv[0] << ", cur: " << cur_pqtzuv[0] | ||||||
<< ", next: " << prev_pqtzuv[0] << "\n"; | ||||||
There was a problem hiding this comment. Choose a reason for hiding this commentThe reason will be displayed to describe this comment to others. Learn more.
Suggested change
|
||||||
} | ||||||
else { | ||||||
float p_ratio = (cur_pqtzuv[0] - prev_pqtzuv[0]) / (next_pqtzuv[0] - prev_pqtzuv[0]); | ||||||
|
@@ -3283,8 +3318,8 @@ void merge_records(float *first_pqtzuv, map<float, float*> pqtzuv_map_pivot, | |||||
if (first_pres < it_pivot->first) break; | ||||||
} | ||||||
mlog << Debug(8) << method_name << "pivot->first: " << it_pivot->first | ||||||
<< " aux->first " << it_aux->first << " first_pres: " << first_pres | ||||||
<< " prev_pqtzuv[0]" << prev_pqtzuv[0] << "\n"; | ||||||
<< " aux->first: " << it_aux->first << " first_pres: " << first_pres | ||||||
<< " prev_pqtzuv[0]: " << prev_pqtzuv[0] << "\n"; | ||||||
// Find next UV level | ||||||
for (; it_aux!=pqtzuv_map_aux.end(); ++it_aux) { | ||||||
// Skip the records below the first mathcing/interpolated level | ||||||
|
There was a problem hiding this comment.
Choose a reason for hiding this comment
The reason will be displayed to describe this comment to others. Learn more.