Список используемых источников

1. Богомолов, А.И. Гидравлика. Учебник для вузов. [Текст] Стройиздат, 1972.-648с.

2. Задачи по гидравлике [Электронный ресурс] - Режим доступа: http://www.coolreferat.com/, свободный.

3. Великанов, М.А. Динамика русловых потоков. Гидрометеоиздат [Текст ], 1949.- 118с.

4.  Бернадский, Н.М. Опыт теории и практики расчета прудов-холодильников. [Текст] М.-Л.: 1933 - 83с.

5. Мостков, М.А. Гидравлический справочник. Гос. изд-во литературы по строительству и архитектуре. [Текст ], 1954.-207с.

6. Планирование гидравлического эксперимента [Электронный ресурс] .- Режим доступа: http://hydraulics.at.ua/_ld/1/128_Kniga_Tsyvin.pdf, свободный.

7. Шамова, В.В. Гидрология Учебник для вузов.[Текст], НГАВТ,2010.- 465с. 8. Иглин, С.П. Математические расчеты на базе MATLAB. [Текст] СПб: БХВ – Петербург, 2005.–640с.

9. Официальный сайт MATLAB [Электронный ресурс]. – Режим доступа: http://matlab.ru/training/MLBE, свободный.

10. Шарутина, В,А. Безопасность жизнедеятельности [Электронный ресурс] . – НГАВТ, 2014. – 1 электрон. опт. диск (CD-ROM).

11. Реферат на тему «Эргономика рабочего места» [Электронный ресурс].- Режим доступа: http://www.up-pro.ru/encyclopedia/ergonomika-rabochego-mesta.html, свободный.

12. Сахнов, Д.Ю. Методические указания для расчета экономической части вы- пускной квалификационной работы. [Текст] НГАВТ, 2013. – 15с.

13. Гришанин, К.В. Теория руслового процесса [Текст] / К.В. Гришанин. – М.: Транспорт, 1972. – 216 с

14. Маккавеев, В.М. Распределение продольных и поперечных скоростей в ОТК-рытых потоках [Текст].- // Труды ГГИ, 1947. – 154с.

Приложение А

Код файла MOD_PZ_ST.m

function varargout = MOD_PZ_ST(varargin)

% MOD_PZ_ST M-file for MOD_PZ_ST.fig

% MOD_PZ_ST, by itself, creates a new MOD_PZ_ST or raises the existing

% singleton*.

%

% H = MOD_PZ_ST returns the handle to a new MOD_PZ_ST or the handle to

% the existing singleton*.

%

% MOD_PZ_ST('CALLBACK',hObject,eventData,handles,...) calls the local

% function named CALLBACK in MOD_PZ_ST.M with the given input arguments.

%

% MOD_PZ_ST('Property','Value',...) creates a new MOD_PZ_ST or raises the

% existing singleton*. Starting from the left, property value pairs are

% applied to the GUI before MOD_PZ_ST_OpeningFunction gets called. An

% unrecognized property name or invalid value makes property application

% stop. All inputs are passed to MOD_PZ_ST_OpeningFcn via varargin.

%

% *See GUI Options on GUIDE's Tools menu. Choose "GUI allows only one

% instance to run (singleton)".

%

% See also: GUIDE, GUIDATA, GUIHANDLES

% Copyright 2002-2003 The MathWorks, Inc.

% Edit the above text to modify the response to help MOD_PZ_ST

% Last Modified by GUIDE v2.5 16-Apr-2014 15:45:49

% Begin initialization code - DO NOT EDIT

gui_Singleton = 1;

gui_State = struct('gui_Name', mfilename, ...

'gui_Singleton', gui_Singleton, ...

'gui_OpeningFcn', @MOD_PZ_ST_OpeningFcn, ...

'gui_OutputFcn', @MOD_PZ_ST_OutputFcn, ...

'gui_LayoutFcn', [] , ...

'gui_Callback', []);

if nargin && ischar(varargin{1})

gui_State.gui_Callback = str2func(varargin{1});

end

if nargout

[varargout{1:nargout}] = gui_mainfcn(gui_State, varargin{:});

else

gui_mainfcn(gui_State, varargin{:});

end

% End initialization code - DO NOT EDIT

% --- Executes just before MOD_PZ_ST is made visible.

function MOD_PZ_ST_OpeningFcn(hObject, eventdata, handles, varargin)

% This function has no output args, see OutputFcn.

% hObject handle to figure

% Choose default command line output for MOD_PZ_ST

handles.output = hObject;

% Update handles structure

guidata(hObject, handles);

% UIWAIT makes MOD_PZ_ST wait for user response (see UIRESUME)

% uiwait(handles.figure1);

set(handles.figure1,'Name','ПЛАНОВАЯ ЗАДАЧА MOD_PZ_ST')

global interp_type

interp_type = 'linear' ;

set(handles.bt_INTERPOL, 'String','linear')

dir *.txt

% --- Outputs from this function are returned to the command line.

function varargout = MOD_PZ_ST_OutputFcn(hObject, eventdata, handles)

% varargout cell array for returning output args (see VARARGOUT);

% hObject handle to figure

% eventdata reserved - to be defined in a future version of MATLAB

% handles structure with handles and user data (see GUIDATA)

% Get default command line output from handles structure

varargout{1} = handles.output;

% --- Executes on button press in START.

% function START_Callback(hObject, eventdata, handles)

% --- Executes on button press in pb2_START2.

function pb2_START2_Callback(hObject, eventdata, handles)

% hObject handle to pb2_START2 (see GCBO)

% eventdata reserved - to be defined in a future version of MATLAB

% handles structure with handles and user data (see GUIDATA)

global interp_type

%interp_type = 'linear';

%_______________________________________________________

clc

dir *.txt

% disp(handles)

%dialog

%msgbox

%winmenu

%inputdlg

Sech(1).name=get(handles.sech1,'String');

Sech(2).name=get(handles.sech2,'String');

Sech(3).name=get(handles.sech3,'String');

Sech(4).name=get(handles.sech4,'String');

Sech(5).name=get(handles.sech5,'String');

Sech(6).name=get(handles.sech6,'String');

Sech(7).name=get(handles.sech7,'String');

S_MAX=7;

for n=1:S_MAX

Sech(n).name;

end

% Name_Uch= ['RES_' Sech(1).name '_' Sech(2).name '.txt'];

% % set(handles.txt_Name_Uch,'String',Name_Uch);

% Data_Uch =csvread(Name_Uch);

% SIZ_Uch= size(Data_Uch);

%

% Numm_elem_Uch=numel(Data_Uch);

% S1 = Data_Uch(1,:);

% S2 = Data_Uch(2,:);

% S3 = Data_Uch(3,:);

% B_H = S1(1,1); OMEGA_H =S1(1,2); T_SRED_H = S1(1,3);

% B_K = S2(1,1); OMEGA_K =S2(1,2); T_SRED_K = S2(1,3);

% SREZKA_H= S3(1,1); SREZKA_K = S3(1,2); SHEROX= S3(1,3);

% DISTANT =S3(1,4); F = S3(1,5);

% %set(handles.ed_MODULF,'String',num2str(F));

%___________ Чтение файлов линий тока ____________

for m=1:S_MAX-1

Name_Tok= ['TOK_' Sech(m).name '_' Sech(m+1).name '.txt'];

% Name_Tok= 'TOK_TeST1_TeST2.txt'

Data_Tok =csvread(Name_Tok);

SIZ_Tok= size(Data_Tok);

Numm_elem_Tok=numel(Data_Tok) ;

arBH(m).Tok = Data_Tok(1,:);

arBK(m).Tok = Data_Tok(3,:);

end

NQ= length(arBH(1).Tok)-1;

set(handles.ed_N,'String',num2str(NQ));

% arBH

% arBH.Tok

% arBK.Tok

%___________ Матрица линий тока ____________

for m=1:S_MAX-1

LinSech(m).Tok = arBH(m).Tok ;

end

LinSech(S_MAX).Tok = arBK(S_MAX-1).Tok;

for k=1:NQ+1

for r=1:S_MAX

LinTok(r,k)= LinSech(r).Tok(k);

end

end

LinTok';

size(LinTok);

%-------------- X Координаты сечений

axes(handles.axesH);

cla; hold on

grid on

%------------- DIST

% DIST= [0 100 200 300 400 500 600]

DST(1) = str2double(get(handles.ed_D1, 'String'));

DST(2) = str2double(get(handles.ed_D2, 'String'));

DST(3) = str2double(get(handles.ed_D3, 'String'));

DST(4) = str2double(get(handles.ed_D4, 'String'));

DST(5) = str2double(get(handles.ed_D5, 'String'));

DST(6) = str2double(get(handles.ed_D6, 'String'));

DST(7) = str2double(get(handles.ed_D7, 'String'));

DIST = DST ;

%-------------Y Береговой линии

REL(1) = str2double(get(handles.ed_R1, 'String'));

REL(2) = str2double(get(handles.ed_R2, 'String'));

REL(3) = str2double(get(handles.ed_R3, 'String'));

REL(4) = str2double(get(handles.ed_R4, 'String'));

REL(5) = str2double(get(handles.ed_R5, 'String'));

REL(6) = str2double(get(handles.ed_R6, 'String'));

REL(7) = str2double(get(handles.ed_R7, 'String'));

REL;

% size(REL)

M_REL=[REL; REL; REL; REL; REL; REL; REL; REL; REL; REL; REL]';

size(M_REL);

state= get(handles.check1,'Value') ;% wiev line

if state==0 NN=NQ+1;

else NN=1;

end

%----------- Вывод линий тока (линейный)----------

if strcmp(interp_type, 'linear')

for k=1:S_MAX-1

for n=NN : NQ+1

if (n==1)|(n==NQ+1)

Col= 'black'; LW=3;

else Col= 'blue'; LW = 2;

end

line([DIST(k) DIST(k+1)],[arBH(k).Tok(n)+REL(k) ...

arBK(k).Tok(n)+REL(k+1)],...

'LineWidth',LW,'Color',Col)

end

end

line([DIST],[REL],'LineWidth',4,'Color','black')

end

% AA = [arBH.Tok] ;

% AA1 =[arBH(1).Tok];

%----------- Вывод линий тока (сплайн)----------

LSS =LinTok+M_REL;

plt=0.01;% шаг plot

if strcmp(interp_type, 'cubic')

for m=NN:NQ+1

X=DIST;

Y= LSS(:,m);

XX=DIST(1):plt*DIST(end):DIST(end);

YY= spline(X,Y,XX) ;

if( m==1) | (m==NQ+1 )

Col='black'; LW =4;

else Col='blue'; LW = 2;

end

%plot(X,Y,'o',XX,YY,'-','LineWidth',2,'Color',Col,'LineWidth',LW)

plot(XX,YY,'-','LineWidth',2,'Color',Col,'LineWidth',LW)

end

X=DIST;

Y= LSS(:,1);

XX=DIST(1):plt*DIST(end):DIST(end);

YY= spline(X,Y,XX) ;

plot(XX,YY,'-','LineWidth',2,'Color',Col,'LineWidth',LW)

end

%_________________________________________________________

%---------------------- CHESI

Q = str2double(get(handles.ed_Q,'String'));

F = str2double(get(handles.ed_MODULF,'String'));

DZ = Q^2*F ;

set(handles.ed_DZ,'String',num2str(DZ ));

DISTANT = DIST(end);

UKLON = (DZ/DISTANT)*1000;

set(handles.ed_UKLON,'String',num2str(UKLON ));

DQ = Q/NQ;

set(handles.ed_DQ,'String',num2str(DQ ));

% --- Executes on button press in bt_INTERPOL.

function bt_INTERPOL_Callback(hObject, eventdata, handles)

% hObject handle to bt_INTERPOL (see GCBO)

% eventdata reserved - to be defined in a future version of MATLAB

% handles structure with handles and user data (see GUIDATA)

% Hint: get(hObject,'Value') returns toggle state of bt_INTERPOL

global interp_type

button_state = get(hObject,'Value') ;

if button_state == get(hObject,'Max')

% peressed

interp_type = 'linear';

set(handles.bt_INTERPOL, 'String','linear')

elseif button_state == get(hObject,'Min')

% not peressed

interp_type = 'cubic';

set(handles.bt_INTERPOL, 'String','cubic')

end

pb2_START2_Callback(handles.pb2_START2, eventdata, handles)

% --- Executes on button press in check1.

function check1_Callback(hObject, eventdata, handles)

pb2_START2_Callback(handles.pb2_START2, eventdata, handles)

%+++++++++++++++++ END PROGRAM TEXT ++++++++++++++++++++++++

function ed_SREZKA_Callback(hObject, eventdata, handles)

% Hints: get(hObject,'String') returns contents of ed_SREZKA as text

% str2double(get(hObject,'String'))returns contents of ed_SREZKA as a double

function sech2_Callback(hObject, eventdata, handles)

function ed_DISTANT_Callback(hObject, eventdata, handles)

function ed_SHEROX_Callback(hObject, eventdata, handles)

function ed_MODULF_Callback(hObject, eventdata, handles)

function sech1_Callback(hObject, eventdata, handles)

% handles structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'String') returns contents of sech1 as text

% str2double(get(hObject,'String')) returns contents of sech1 as a double

% name = 'S1L.txt'

% nameH = get(hObject,'String')

% DAT =csvread(nameH)

% ------------------------ CREATE FUNCTIONS

% --- Executes during object creation, after setting all properties.

function ed_MODULF_CreateFcn(hObject, eventdata, handles)

% hObject handle to ed_MODULF (see GCBO)

% eventdata reserved - to be defined in a future version of MATLAB

% handles empty - handles not created until after all CreateFcns called

% Hint: edit controls usually have a white background on Windows.

% See ISPC and COMPUTER.

if ispc && isequal(get(hObject,'BackgroundColor'),...

get(0,'defaultUicontrolBackgroundColor'))

set(hObject,'BackgroundColor','white');

end

% --- Executes during object creation, after setting all properties.

function ed_SHEROX_CreateFcn(hObject, eventdata, handles)

if ispc && isequal(get(hObject,'BackgroundColor'), ...

get(0,'defaultUicontrolBackgroundColor'))

set(hObject,'BackgroundColor','white');

end

% --- Executes during object creation, after setting all properties.

function ed_DISTANT_CreateFcn(hObject, eventdata, handles)

if ispc && isequal(get(hObject,'BackgroundColor'),...

get(0,'defaultUicontrolBackgroundColor'))

set(hObject,'BackgroundColor','white');

end

% --- Executes during object creation, after setting all properties.

function sech2_CreateFcn(hObject, eventdata, handles)

if ispc && isequal(get(hObject,'BackgroundColor'),...

get(0,'defaultUicontrolBackgroundColor'))

set(hObject,'BackgroundColor','white');

end

% --- Executes during object creation, after setting all properties.

function ed_SREZKA_CreateFcn(hObject, eventdata, handles)

if ispc && isequal(get(hObject,'BackgroundColor'),...

get(0,'defaultUicontrolBackgroundColor'))

set(hObject,'BackgroundColor','white');

end

% --- Executes during object creation, after setting all properties.

function sech1_CreateFcn(hObject, eventdata, handles)

if ispc && isequal(get(hObject,'BackgroundColor'),...

get(0,'defaultUicontrolBackgroundColor'))

set(hObject,'BackgroundColor','white');

end

function Sech3_Callback(hObject, eventdata, handles)

% hObject handle to Sech3 (see GCBO)

% eventdata reserved - to be defined in a future version of MATLAB

% handles structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'String') returns contents of Sech3 as text

% str2double(get(hObject,'String')) returns contents of Sech3 as a double

% --- Executes during object creation, after setting all properties.

function Sech3_CreateFcn(hObject, eventdata, handles)

if ispc && isequal(get(hObject,'BackgroundColor'),...

get(0,'defaultUicontrolBackgroundColor'))

set(hObject,'BackgroundColor','white');

end

function sech4_Callback(hObject, eventdata, handles)

% hObject handle to sech4 (see GCBO)

% eventdata reserved - to be defined in a future version of MATLAB

% handles structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'String') returns contents of sech4 as text

%str2double(get(hObject,'String')) returns contents of sech4 as a double

% --- Executes during object creation, after setting all properties.

function sech4_CreateFcn(hObject, eventdata, handles)

if ispc && isequal(get(hObject,'BackgroundColor'),...

get(0,'defaultUicontrolBackgroundColor'))

set(hObject,'BackgroundColor','white');

end

function sech5_Callback(hObject, eventdata, handles)

% Hints: get(hObject,'String') returns contents of sech5 as text

% str2double(get(hObject,'String')) returns contents of sech5 as a double

% --- Executes during object creation, after setting all properties.

function sech5_CreateFcn(hObject, eventdata, handles)

if ispc && isequal(get(hObject,'BackgroundColor'),...

get(0,'defaultUicontrolBackgroundColor'))

set(hObject,'BackgroundColor','white');

end

function edit10_Callback(hObject, eventdata, handles)

% --- Executes during object creation, after setting all properties.

function edit10_CreateFcn(hObject, eventdata, handles)

if ispc && isequal(get(hObject,'BackgroundColor'),...

get(0,'defaultUicontrolBackgroundColor'))

set(hObject,'BackgroundColor','white');

end

function sech6_Callback(hObject, eventdata, handles)

% --- Executes during object creation, after setting all properties.

function sech6_CreateFcn(hObject, eventdata, handles)

if ispc && isequal(get(hObject,'BackgroundColor'),...

get(0,'defaultUicontrolBackgroundColor'))

set(hObject,'BackgroundColor','white');

end

function ed_DQ_Callback(hObject, eventdata, handles)

% Hints: get(hObject,'String') returns contents of ed_DQ as text

%str2double(get(hObject,'String')) returns contents of ed_DQ as a double

% --- Executes during object creation, after setting all properties.

function ed_DQ_CreateFcn(hObject, eventdata, handles)

if ispc && isequal(get(hObject,'BackgroundColor'),...

get(0,'defaultUicontrolBackgroundColor'))

set(hObject,'BackgroundColor','white');

end

function ed_R_GIDRO_K_Callback(hObject, eventdata, handles)

% --- Executes during object creation, after setting all properties.

function ed_R_GIDRO_K_CreateFcn(hObject, eventdata, handles)

if ispc && isequal(get(hObject,'BackgroundColor'), ...

get(0,'defaultUicontrolBackgroundColor'))

set(hObject,'BackgroundColor','white');

end

function ed_K_RASX_K_Callback(hObject, eventdata, handles)

% --- Executes during object creation, after setting all properties.

function ed_K_RASX_K_CreateFcn(hObject, eventdata, handles)

if ispc && isequal(get(hObject,'BackgroundColor'), ...

get(0,'defaultUicontrolBackgroundColor'))

set(hObject,'BackgroundColor','white');

end

function edit14_Callback(hObject, eventdata, handles)

% --- Executes during object creation, after setting all properties.

function edit14_CreateFcn(hObject, eventdata, handles)

if ispc && isequal(get(hObject,'BackgroundColor'),...

get(0,'defaultUicontrolBackgroundColor'))

set(hObject,'BackgroundColor','white');

end

function ed_K_RASX_H_Callback(hObject, eventdata, handles)

% --- Executes during object creation, after setting all properties.

function ed_K_RASX_H_CreateFcn(hObject, eventdata, handles)

if ispc && isequal(get(hObject,'BackgroundColor'),...

get(0,'defaultUicontrolBackgroundColor'))

set(hObject,'BackgroundColor','white');

end

function ed_C_K_Callback(hObject, eventdata, handles)

% hObject handle to ed_C_K (see GCBO)

% --- Executes during object creation, after setting all properties.

function ed_C_K_CreateFcn(hObject, eventdata, handles)

if ispc && isequal(get(hObject,'BackgroundColor'),...

get(0,'defaultUicontrolBackgroundColor'))

set(hObject,'BackgroundColor','white');

end

function ed_C_H_Callback(hObject, eventdata, handles)

% --- Executes during object creation, after setting all properties.

function ed_C_H_CreateFcn(hObject, eventdata, handles)

if ispc && isequal(get(hObject,'BackgroundColor'),...

get(0,'defaultUicontrolBackgroundColor'))

set(hObject,'BackgroundColor','white');

end

function ed_Q_Callback(hObject, eventdata, handles)

% --- Executes during object creation, after setting all properties.

function ed_Q_CreateFcn(hObject, eventdata, handles)

77