clear?all;close?all;clc;fclose?（‘a(chǎn)ll‘）;
load（‘ssp_test.mat‘）
Depth?=?[0?Depth];???????????%?將深度起始點(diǎn)移到0m
Soundspeed?=?[Soundspeed（1）?Soundspeed];
Gama?=?[Gama（1）?Gama]/1000+1;

%%?Generate?field.flp
fclose（‘a(chǎn)ll‘）;
delete（‘field.flp‘）
titleflp?=?‘field‘;?????????%?to?generate?field.flp
SD?=?20?;???????????????????%?生源垂直深度?m
NSD?=?length（SD）;???????????%?生源在垂直方向上的個數(shù)
RD?=?linspace（0103104）;???%?接收水聽器的深度
NRD?=?length（RD）;???????????%?垂直方向接收水聽器個數(shù)
R?=?linspace（0.1?10?401）;?%?接收水聽器的水平接收范圍
NR=length（R）;???????????????%?水平方向接收水聽器個數(shù)
Pos.theta?=?[];?????Pos.s.depth?=?SD;
Pos.r.depth?=?RD;???Pos.r.range?=?R;
write_fieldflp（‘RA‘?Pos?）;
%?WriteFieldflp（?titleflp?NR?R?NSD?SD?NRD?RD?）;

%%?Generate?env?file
fclose（‘a(chǎn)ll‘）;
envfil?=?‘KrakenDemo‘;?%?to?generate?KrakenDemo.env

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件?????????601??2018-11-22?19:33??README.md
?????目錄???????????0??2018-11-23?20:56??result\
?????文件???????14101??2018-11-23?09:22??result\formula.docx
?????文件???????49645??2018-11-23?09:03??result\LFM.jpg
?????文件???????20659??2018-11-23?09:22??result\LFM1.jpg
?????文件???????16678??2018-11-22?19:39??result\p1_tl_vs_depth.jpg
?????文件???????32499??2018-11-22?19:40??result\p1_tl_vs_range.jpg
?????文件???????38952??2018-11-22?19:36??result\p1_聲場.jpg
?????文件??????103933??2018-11-23?15:32??result\p2_h_2.jpg
?????文件??????106879??2018-11-23?15:33??result\p2_h_5.jpg
?????文件???????97627??2018-11-23?15:34??result\p2_h_8.jpg
?????文件???????54073??2018-11-23?16:15??result\p2_v_2.jpg
?????文件???????58188??2018-11-23?16:15??result\p2_v_5.jpg
?????文件???????58464??2018-11-23?16:14??result\p2_v_8.jpg
?????文件???????23015??2018-11-22?20:13??result\ssp.jpg
?????目錄???????????0??2018-11-23?20:57??src\
?????文件????????2920??2018-11-23?15:51??src\p1.m
?????文件????????3327??2018-11-23?15:50??src\p2_horiztontal.m
?????文件????????3515??2018-11-23?16:15??src\p2_vertical.m
?????文件???????14946??2018-11-19?17:19??src\ssp_test.mat
?????文件??????137315??2018-11-23?20:56??任務(wù)說明.png