This definition is based on version 5/B of product specification PO-RS-MDA-GS-2009 Vol11
binary record | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
|
This product definition is applicable if a product matches the following rule:
bytes(/,0,8) == "PRODUCT=" and bytes(/,9,10) == "MER_RR__2P" |
name | size | initialisation |
---|---|---|
sceneRasterWidth | $sceneRasterWidth = int(/sph/line_length) | |
tiePointGridWidth | $tiePointGridWidth = int(/sph/line_length) / int(/sph/samples_per_tie_pt) + if(int(/sph/line_length) % int(/sph/samples_per_tie_pt) == 0, 0, 1) | |
num_dsd | $num_dsd = int(/mph/num_dsd) | |
num_ds | $num_ds = 23 | |
ds_to_dsd_index | [$num_ds] | $ds_to_dsd_index[0] = index(/dsd, str(./ds_name) == "Quality ADS "); $ds_to_dsd_index[1] = index(/dsd, str(./ds_name) == "Scaling Factor GADS "); $ds_to_dsd_index[2] = index(/dsd, str(./ds_name) == "Tie points ADS "); $ds_to_dsd_index[3] = index(/dsd, str(./ds_name) == "Norm. rho_surf - MDS(1) "); $ds_to_dsd_index[4] = index(/dsd, str(./ds_name) == "Norm. rho_surf - MDS(2) "); $ds_to_dsd_index[5] = index(/dsd, str(./ds_name) == "Norm. rho_surf - MDS(3) "); $ds_to_dsd_index[6] = index(/dsd, str(./ds_name) == "Norm. rho_surf - MDS(4) "); $ds_to_dsd_index[7] = index(/dsd, str(./ds_name) == "Norm. rho_surf - MDS(5) "); $ds_to_dsd_index[8] = index(/dsd, str(./ds_name) == "Norm. rho_surf - MDS(6) "); $ds_to_dsd_index[9] = index(/dsd, str(./ds_name) == "Norm. rho_surf - MDS(7) "); $ds_to_dsd_index[10] = index(/dsd, str(./ds_name) == "Norm. rho_surf - MDS(8) "); $ds_to_dsd_index[11] = index(/dsd, str(./ds_name) == "Norm. rho_surf - MDS(9) "); $ds_to_dsd_index[12] = index(/dsd, str(./ds_name) == "Norm. rho_surf - MDS(10) "); $ds_to_dsd_index[13] = index(/dsd, str(./ds_name) == "Norm. rho_surf - MDS(11) "); $ds_to_dsd_index[14] = index(/dsd, str(./ds_name) == "Norm. rho_surf - MDS(12) "); $ds_to_dsd_index[15] = index(/dsd, str(./ds_name) == "Norm. rho_surf - MDS(13) "); $ds_to_dsd_index[16] = index(/dsd, str(./ds_name) == "Vapour Content - MDS(14) "); $ds_to_dsd_index[17] = index(/dsd, str(./ds_name) == "Chl_1, TOAVI - MDS(15) "); $ds_to_dsd_index[18] = index(/dsd, str(./ds_name) == "YS, SPM, Rect. Rho- MDS(16) "); $ds_to_dsd_index[19] = index(/dsd, str(./ds_name) == "Chl_2, BOAVI - MDS(17) "); $ds_to_dsd_index[20] = index(/dsd, str(./ds_name) == "Press PAR Alb - MDS(18) "); $ds_to_dsd_index[21] = index(/dsd, str(./ds_name) == "Alpha, OPT - MDS(19) "); $ds_to_dsd_index[22] = index(/dsd, str(./ds_name) == "Flags - MDS(20) ") |
ds_available | [$num_ds] | for i = 0 to $num_ds - 1 do $ds_available[i] = if($ds_to_dsd_index[i] != -1 and !(bytes(/dsd[$ds_to_dsd_index[i]]/filename,8) == "NOT USED"), 1, 0) |
ds_offset | [$num_ds] | for i = 0 to $num_ds - 1 do $ds_offset[i] = 8 * int(/dsd[$ds_to_dsd_index[i]]/ds_offset) |
num_dsr | [$num_ds] | for i = 0 to $num_ds - 1 do $num_dsr[i] = int(/dsd[$ds_to_dsd_index[i]]/num_dsr) |