Nghiên cứu ứng dụng công nghệ làm lạnh chân không trong việc bảo quản bắp

ĐẠI HỌC QUỐC GIA TP HCM TRƢỜNG ĐẠI HỌC BÁCH KHOA VÕ THIỆN MỸ NGHIÊN CỨU ỨNG DỤNG CÔNG NGHỆ LÀM LẠNH CHÂN KHÔNG TRONG VIỆC BẢO QUẢN BẮP Chuyên ngành : KỸ THUẬT NHIỆT Mã số : 60.52.80 LUẬN VĂN THẠC SĨ TP HỒ CHÍ MINH, THÁNG NĂM 2014 i CƠNG TRÌNH ĐƢỢC HỒN THÀNH TẠI TRƢỜNG ĐẠI HỌC BÁCH KHOA –ĐHQG -HCM Cán hƣớng dẫn khoa học : TS NGUYỄN THẾ BẢO (Ghi rõ họ, tên, học hàm, học vị chữ ký) Cán chấm nhận xét : TS HÀ ANH TÙNG (Ghi rõ họ, tên, học hàm, học vị chữ ký) Cán chấm nhận xét : TS NGUYỄN VĂN TUYÊN (Ghi rõ họ, tên, học hàm, học vị chữ ký) Luận văn thạc sĩ đƣợc bảo vệ Trƣờng Đại học Bách Khoa, ĐHQG Tp HCM ngày 15 tháng năm 2014 Thành phần Hội đồng đánh giá luận văn thạc sĩ gồm: (Ghi rõ họ, tên, học hàm, học vị Hội đồng chấm bảo vệ luận văn thạc sĩ) GS.TS LÊ CHÍ HIỆP – CHỦ TỊCH HỘI ĐỒNG PGS.TS HOÀNG AN QUỐC – THƢ KÝ, ỦY VIÊN TS HÀ ANH TÙNG – PHẢN BIỆN TS NGUYỄN VĂN TUYÊN – PHẢN BIỆN TS NGUYỄN THẾ BẢO – ỦY VIÊN Xác nhận Chủ tịch Hội đồng đánh giá LV Trƣởng Khoa quản lý chuyên ngành sau luận văn đƣợc sửa chữa (nếu có) CHỦ TỊCH HỘI ĐỒNG GS.TS LÊ CHÍ HIỆP TRƢỞNG KHOA CƠ KHÍ ii ĐẠI HỌC QUỐC GIA TP.HCM TRƢỜNG ĐẠI HỌC BÁCH KHOA CỘNG HÕA XÃ HỘI CHỦ NGHĨA VIỆT NAM Độc lập - Tự - Hạnh phúc NHIỆM VỤ LUẬN VĂN THẠC SĨ Họ tên học viên: VÕ THIỆN MỸ MSHV: 11064587 Ngày, tháng, năm sinh: 08/06/1980 Nơi sinh: HCM Chuyên ngành: KỸ THUẬT NHIỆT Mã số : 60.52.80 I TÊN ĐỀ TÀI: NGHIÊN CỨU ỨNG DỤNG CÔNG NGHỆ LÀM LẠNH CHÂN KHÔNG TRONG VIỆC BẢO QUẢN BẮP II NHIỆM VỤ VÀ NỘI DUNG: - Nghiên cứu ứng dụng cơng nghệ làm lạnh chân khơng - Viết chƣơng trình tính tốn máy lạnh chân khơng ngơn ngữ Matlab - Thí nghiệm đo nhiệt độ tâm trái bắp theo thời gian làm lạnh chân khơng - Viết chƣơng trình mô nhiệt độ tâm trái bắp ngôn ngữ Matlab với thuật toán sai phân hữu hạn - So sánh kết tính tốn lý thuyết thực nghiệm - Kết luận kiến nghị III NGÀY GIAO NHIỆM VỤ: 24/6/2013 IV NGÀY HOÀN THÀNH NHIỆM VỤ: 20/06/2014 V CÁN BỘ HƢỚNG DẪN: TS NGUYỄN THẾ BẢO Tp HCM, ngày tháng năm 2014 CÁN BỘ HƢỚNG DẪN (Họ tên chữ ký) TS NGUYỄN THẾ BẢO CHỦ NHIỆM BỘ MÔN ĐÀO TẠO (Họ tên chữ ký) GS.TS LÊ CHÍ HIỆP TRƢỞNG KHOA CƠ KHÍ (Họ tên chữ ký) iii LỜI CÁM ƠN Đầu tiên, xin chân thành cảm ơn TS Nguyễn Thế Bảo quan tâm hỗ trợ nhiều trình làm luận văn Thứ hai, xin cảm ơn quý Thầy, Cô Bộ môn Công nghệ Nhiệt Trƣờng Đại học Bách khoa Tp.HCM đóng góp ý kiến q báu giúp tơi hồn thiện q trình nghiên cứu Cuối cùng, tơi xin cảm ơn bạn bè, gia đình đồng nghiệp động viên giúp cho đề tài thành công First of all, I would like to thank you for Mr Nguyễn Thế Bảo who supported and instructed me on my thesis Secondly, thank for all of teachers of Heat Technology in University of Technology HCMC, who contributed their valuable comments for my completed research Finally thank you for friends, colleagues, family enouraging me to be sucessful in this thesis iv TÓM TẮT LUẬN VĂN THẠC SỸ Làm lạnh chân không phƣơng pháp làm lạnh sơ bộ, có thời gian làm lạnh nhanh (khoảng 20 tới 30 phút) Bản chất phƣơng pháp làm lạnh sản phẩm điều kiện chân khơng có khử ẩm nhờ dàn bay hệ thống lạnh Dựa mơ hình máy lạnh chân khơng đƣợc chế tạo từ kết đề tài nghiên cứu cấp Sở Khoa học Công nghệ Tp.HCM làm chủ nhiệm đề tài đƣợc nghiệm thu loại vào 20/5/2011, tiến hành nghiên cứu thử nghiệm phƣơng pháp làm lạnh chân không bắp ngô, đồng thời viết chƣơng trình mơ nhiệt độ tâm trái bắp theo thời gian ngôn ngữ Matlab với phƣơng pháp sai phân phân hữu hạn Sau đó, tơi kết hợp thử nghiệm bắp mơ hình máy lạnh chân khơng để kiểm chứng thuật tốn cho kết thành công SUMMARY OF THESIS Vacuum cooling is one of the precooling methods with rapid cooling time (about 20 to 30 minutes) The essence of this method is cooling the product in vacuum conditions due to dehumidification evaporator of the refrigeration system From the model of vacuum cooler which was created under result of the research topic for Department of Science and Technology HCMC carried out by me and it was accessed as good on 20/05/2011, it was conducted with the vacuum cooling method on Corns by me, and a program of simulation at the center of Corns was written by Matlab language with the method of finite difference Then, I combined it with the model of vacuum cooler in order to check the algorithm and the good result was given v LỜI CAM ĐOAN CỦA TÁC GIẢ Tôi xin cam đoan kết đạt đƣợc luận văn thực viết Nếu có sai trái, tơi xin chịu trách nhiệm trƣớc pháp luật Ngày 20 tháng năm 2014 Học viên ký tên VÕ THIỆN MỸ vi MỤC LỤC Trang LỜI CÁM ƠN iii TÓM TẮT LUẬN VĂN THẠC SỸ iv LỜI CAM ĐOAN CỦA TÁC GIẢ .v DANH SÁCH CÁC BẢNG BIỂU x DANH SÁCH CÁC HÌNH x DANH SÁCH CÁC KÝ HIỆU VÀ ĐƠN VỊ xii CHƢƠNG 1: MỞ ĐẦU 1.1 Lý chọn đề tài 1.2 Mục tiêu đề tài .1 1.3 Đối tƣợng phạm vi nghiên cứu đề tài .1 1.3.1 Đối tƣợng 1.3.2 Phạm vi nghiên cứu 1.4 Ý nghĩa khoa học thực tiễn đề tài .1 1.4.1 Ý nghĩa khoa học 1.4.2 Ý nghĩa thực tiễn .2 CHƢƠNG 2: TỔNG QUAN .3 2.1 Giới thiệu số phƣơng pháp bảo quản rau .3 2.1.1 Các vấn đề chung bảo quản rau 2.1.1.1 Tác dụng việc bảo quản nhiệt độ thấp [2] 2.1.1.2 Tác dụng việc bảo quản tách nƣớc [2] 2.1.2 Các phƣơng pháp bảo quản lạnh .5 2.1.2.1 Làm lạnh sản phẩm cách đối lƣu cƣỡng khơng khí (forced-air cooling) 2.1.2.2 Làm lạnh sản phẩm nƣớc lạnh (immersion hydrocooling) 2.1.2.3 Làm lạnh cách phun nƣớc lên sản phẩm (hydraircooling) 2.1.2.4 Làm lạnh chân không (vacuum cooling) 2.2 So sánh tiêu hao lƣợng số phƣơng pháp làm lạnh .12 2.3 Tình hình nghiên cứu làm lạnh chân khơng ngồi nƣớc .13 vii 2.3.1 Ngoài nƣớc 13 2.3.2 Trong nƣớc 13 2.4 Tính cấp thiết đề tài .13 2.5 Phƣơng pháp nghiên cứu 14 2.5.1 Phƣơng pháp toán học .14 2.5.2 Phƣơng pháp thực nghiệm 14 CHƢƠNG 15 CƠ SỞ TÍNH TỐN MÁY LẠNH CHÂN KHƠNG 15 3.1 Tính tốn bơm chân khơng [9] 15 3.2 Tính phụ tải lạnh [10] 16 3.3 Tính tốn chu trình lạnh cấp dùng R22 [10] 17 3.4 Tính tốn diện tích truyền nhiệt dàn lạnh [11] 18 CHƢƠNG 22 VIẾT CHƢƠNG TRÌNH TÍNH TỐN MÁY LẠNH CHÂN KHƠNG BẰNG MATLAB 22 4.1 Sơ đồ khối 22 4.1.1 Sơ đồ khối tính tốn bơm chân khơng 22 4.1.2 Sơ đồ khối tính phụ tải lạnh 23 4.1.3 Sơ đồ khối tính tốn chu trình lạnh cấp dùng R22 23 4.1.4 Sơ đồ khối tính tốn diện tích truyền nhiệt dàn lạnh 24 4.2 Lập giao diện chƣơng trình 26 4.2.1 Giao diện tính tốn bơm chân khơng 26 4.2.2 Giao diện tính phụ tải lạnh 26 4.2.3 Giao diện tính tốn chu trình lạnh cấp dùng R22 27 4.2.4 Giao diện tính tốn diện tích truyền nhiệt dàn lạnh 27 4.2.5 Giao diện chƣơng trình 28 CHƢƠNG : MƠ HÌNH MÁY LẠNH CHÂN KHƠNG .29 5.1 Kết tính tốn từ chƣơng trình Matlab 29 5.1.1 Kết tính tốn bơm chân khơng 29 5.1.2 Kết tính phụ tải lạnh 30 viii 5.1.3 Kết tính tốn chu trình lạnh cấp dùng R22 30 5.1.4 Kết tính tốn diện tích truyền nhiệt dàn lạnh 30 5.2 Mơ hình máy lạnh chân khơng 31 5.3 Kết thử nghiệm bắp mơ hình máy lạnh chân không 36 5.3.1 Các dụng cụ đo 36 5.3.1.1 Nhiệt kế 36 5.3.1.2 Ẩm kế: 37 5.3.1.3 Cân .37 5.3.2 Kết thí nghiệm bắp mơ hình 38 CHƢƠNG 42 MÔ PHỎNG NHIỆT ĐỘ BẮP THEO THỜI GIAN 42 6.1 Cơ sở lý thuyết 42 6.1.1 Phƣơng trình truyền nhiệt .42 6.1.2 Các điều kiện biên 49 6.1.3 Lƣợng nhiệt hóa 49 6.1.4 Các phƣơng trình liên quan đến áp suất khí buồng chân không 50 6.2 Sơ đồ khối tính tốn 51 6.3 Chƣơng trình mơ nhiệt độ tâm trái bắp 51 6.4 So sánh kết từ mô thực tế khảo sát 53 CHƢƠNG 7: KẾT LUẬN VÀ KIẾN NGHỊ 57 7.1 Kết luận 57 7.2 Kiến nghị 57 DANH MỤC CÁC CƠNG TRÌNH KHOA HỌC 58 TÀI LIỆU THAM KHẢO 59 PHỤ LỤC 62 Phụ lục 1: Hàm làm tròn số thứ n sau dấu phẩy .62 Phụ lục 2: Hàm tra thơng số vật lý khơng khí khơ .62 Phụ lục 3: Hàm tính tốn thơng số khơng khí ẩm .62 Phụ lục 4: Hàm tra thông số bão hòa R22 63 Phụ lục 5: Hàm tra thông số nhiệt R22 66 ix Phụ lục 6: Hàm tính tốn hệ số tỏa nhiệt đối lƣu khơng khí 88 Phụ lục 7: Hàm tính tốn chu trình lạnh cấp dùng gas R22 88 Phụ lục 8: Mã code giao diện tính tốn bơm chân không 89 Phụ lục 9: Mã code giao diện tính tốn phụ tải lạnh 92 Phụ lục 10: Mã code giao diện tính tốn chu trình lạnh cấp dùng R22 95 Phụ lục 11: Mã code giao diện tính tốn diện tích truyền nhiệt dàn lạnh 98 Phụ lục 12: Mã code giao diện chƣơng trình 105 PHẦN LÝ LỊCH TRÍCH NGANG 107 93 if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function Lb_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function Lb_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function lamda_v_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function lamda_v_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function delta_v_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function delta_v_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end % - Executes on selection change in sanpham function sanpham_Callback(hObject, eventdata, handles) sp=get(handles.sanpham,'Value'); switch sp case set(handles.cp,'String','3.90'); case set(handles.cp,'String','4.03'); case set(handles.cp,'String','4.01'); case set(handles.cp,'String','3.90'); case set(handles.cp,'String','4.02'); case set(handles.cp,'String','4.02'); case set(handles.cp,'String','4.07'); case set(handles.cp,'String','4.09'); case set(handles.cp,'String','3.99'); case 10 set(handles.cp,'String','3.62'); otherwise set(handles.cp,'String',''); end % - Executes during object creation, after setting all properties 94 function sanpham_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function m_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function m_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function cp_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function cp_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function Q1_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function Q1_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function Q2_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function Q2_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function Qo_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function Qo_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function tau_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function tau_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 text_CreateFcn(hObject, eventdata, handles) 95 if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end % - Executes during object creation, after setting all properties function text20_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function tinh_toan_Callback(hObject, eventdata, handles) alpa_ng=8; % W/m2K alpa_tr=8;% W/m2K % lamda_v=str2num(get(handles.lamda_v,'String')); delta_v=str2num(get(handles.delta_v,'String')); Db=str2num(get(handles.Db,'String')); Lb=str2num(get(handles.Lb,'String')); t1=str2num(get(handles.t1,'String')); t2=str2num(get(handles.t2,'String')); m=str2num(get(handles.m,'String')); tau=str2num(get(handles.tau,'String')); cp=str2num(get(handles.cp,'String')); % k=1/(1/alpa_tr+delta_v/lamda_v+1/alpa_ng); F=2*pi/4*(Db-2*delta_v)^2+pi*(Db-2*delta_v)*(Lb-2*delta_v); Q1=k*F*(t1-t2)*10^-3; %kW Q2=m/(tau*60)*cp*(t1-t2);%kW Qo=1.05*(Q1+Q2);%kW set(handles.Q1,'String',num2str(Q1)); set(handles.Q2,'String',num2str(Q2)); set(handles.Qo,'String',num2str(Qo)); function t1_Callback(hObject, eventdata, handles) function t2_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function t1_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 t2_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end Phụ lục 10: Mã code giao diện tính tốn chu trình lạnh cấp dùng R22 function varargout = TT_CTL_1CAP_R22(varargin) % Begin initialization code - DO NOT EDIT gui_Singleton = 1; gui_State = struct('gui_Name', mfilename, 'gui_Singleton', gui_Singleton, 96 'gui_OpeningFcn', @TT_CTL_1CAP_R22_OpeningFcn, 'gui_OutputFcn', @TT_CTL_1CAP_R22_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 TT_CTL_1CAP_R22 is made visible function TT_CTL_1CAP_R22_OpeningFcn(hObject, eventdata, handles, varargin) handles.output = hObject; % Update handles structure guidata(hObject, handles); rgb=imread('Gian_do.jpg'); image(rgb); axis off % - Outputs from this function are returned to the command line function varargout = TT_CTL_1CAP_R22_OutputFcn(hObject, eventdata, handles) varargout{1} = handles.output; function tk_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function tk_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function to_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function to_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function Dtql_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function Dtql_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end 97 function Dtqn_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function Dtqn_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function Qo_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function Qo_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end % - Executes on button press in pushbutton1 function pushbutton1_Callback(hObject, eventdata, handles) format short g tk=str2num(get(handles.tk,'String')); to=str2num(get(handles.to,'String')); Dtql=str2num(get(handles.Dtql,'String')); Dtqn=str2num(get(handles.Dtqn,'String')); Qo=str2num(get(handles.Qo,'String')); % [thong_so,x6,G,Qk,L,epxilon]=CTL1C_CQL_CQN_R22(Qo,to,tk,Dtql,Dtqn); set(handles.TS,'data',thong_so); set(handles.x6,'String',num2str(x6)); set(handles.G,'String',num2str(G)); set(handles.Qk,'String',num2str(Qk)); set(handles.L,'String',num2str(L)); set(handles.epxilon,'String',num2str(epxilon)); function G_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function G_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function Qk_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function Qk_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function L_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties 98 function L_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function epxilon_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function epxilon_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 axes2_CreateFcn(hObject, eventdata, handles) function x6_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function x6_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end Phụ lục 11: Mã code giao diện tính tốn diện tích truyền nhiệt dàn lạnh function varargout = TT_dien_tich_truyen_nhiet_DL(varargin) % Begin initialization code - DO NOT EDIT gui_Singleton = 1; gui_State = struct('gui_Name', mfilename, 'gui_Singleton', gui_Singleton, 'gui_OpeningFcn', @TT_dien_tich_truyen_nhiet_DL_OpeningFcn, 'gui_OutputFcn', @TT_dien_tich_truyen_nhiet_DL_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 TT_dien_tich_truyen_nhiet_DL is made visible function TT_dien_tich_truyen_nhiet_DL_OpeningFcn(hObject, eventdata, handles, varargin) handles.output = hObject; rgb=imread('DL5.jpg'); 99 image(rgb); axis off % Update handles structure guidata(hObject, handles); % - Outputs from this function are returned to the command line function varargout = TT_dien_tich_truyen_nhiet_DL_OutputFcn(hObject, eventdata, handles) varargout{1} = handles.output; % - Executes on button press in pushbutton1 function pushbutton1_Callback(hObject, eventdata, handles) Qo=str2num(get(handles.Qo,'String'))*10^3; to=str2num(get(handles.to,'String')); VB=str2num(get(handles.VB,'String'))*10^-3; H=str2num(get(handles.H,'String')); L=str2num(get(handles.L,'String')); dtr=str2num(get(handles.dtr,'String')); dng=str2num(get(handles.dng,'String')); S1=str2num(get(handles.S1,'String')); S2=str2num(get(handles.S2,'String')); delta_c=str2num(get(handles.delta_c,'String')); Sc=str2num(get(handles.Sc,'String')); lamda_c=str2num(get(handles.lamda_c,'String')); do=str2num(get(handles.do,'String')); no=str2num(get(handles.no,'String')); Rc=str2num(get(handles.Rc,'String')); Rb=str2num(get(handles.Rb,'String')); tkk1=str2num(get(handles.tkk1,'String')); p1=str2num(get(handles.p1,'String')); phi_kk1=str2num(get(handles.phi_kk1,'String'))*10^-2; tkk2=str2num(get(handles.tkk2,'String')); p2=str2num(get(handles.p2,'String')); % -fc=2*(S1*S2-.785*dng^2)/Sc; foc=pi*dng*(1-delta_c/Sc); f2=fc+foc; f2=round1(f2,4); f1=pi*dtr; f1=round1(f1,4); beta_c=round1(f2/f1,1); [alpha]=alpha_KKA_chum_ong_sole_canh_phang(VB,dng,delta_c,Sc,S1,S2,no,do, tkk1,tkk2); [pbh1,ph1,d1,I1,t_ds1]=Thongso_KKA_biet_t_phi(tkk1,phi_kk1); he_so_tach_am=1+2480*d1/(tkk1-tkk2); alpha_kk=he_so_tach_am*alpha; S=[(S1/2)^2+S2^2]^.5; h1=.5*(S1-dng)*[1+.805*log10(1.28*S1/dng*sqrt(S/S1-.2))]; h1=round1(h1,4); m=[2*alpha_kk/lamda_c/delta_c]^.5; hieu_suat_canh=round1(tanh(m*h1)/(m*h1),4); hieu_suat_nhiet_canh=round1((hieu_suat_canh*fc+foc)/f2,4); alpha_2=alpha_kk*hieu_suat_nhiet_canh; alpha_2=round1(alpha_2,2); alpha_1=2470*(0.15)^0.47; % phia gas R22 alpha_1=round1(alpha_1,2); k2=[1/(beta_c/alpha_1+Rc+Rb+1/alpha_2)]; k2=round1(k2,2); tkk=(tkk1+tkk2)/2; q2=k2*(tkk-to); F2=round1(Qo/q2,2); L_ong=round1(F2/f2,2); n=ceil(L_ong/L); 100 n1=ceil(H/S1); n2=ceil(n/n1); W=n2*S2; set(handles.f2,'String',num2str(f2)); set(handles.f1,'String',num2str(f1)); set(handles.beta_c,'String',num2str(beta_c)); set(handles.xi,'String',num2str(he_so_tach_am)); set(handles.h1,'String',num2str(h1)); set(handles.eta_c,'String',num2str(hieu_suat_canh)); set(handles.eta_tc,'String',num2str(hieu_suat_nhiet_canh)); set(handles.alpha_1,'String',num2str(alpha_1)); set(handles.alpha_2,'String',num2str(alpha_2)); set(handles.k2,'String',num2str(k2)); set(handles.FF2,'String',num2str(F2)); set(handles.L_ong,'String',num2str(L_ong)); set(handles.n1,'String',num2str(n1)); set(handles.n2,'String',num2str(n2)); function Qo_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function Qo_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function VB_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function VB_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function H_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function H_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function h1_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function h1_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function L_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function L_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) 101 set(hObject,'BackgroundColor','white'); end function xi_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function xi_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function f2_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function f2_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function f1_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function f1_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function dtr_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function dtr_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function dng_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function dng_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function S1_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function S1_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function S2_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function S2_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); 102 end function delta_c_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function delta_c_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function Sc_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function Sc_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function lamda_c_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function lamda_c_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function do_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function do_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function no_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function no_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function Rc_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function Rc_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function beta_c_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function beta_c_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end 103 function Rb_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function Rb_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function edit21_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function edit21_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function tkk1_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function tkk1_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function p1_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function p1_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function FF2_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function FF2_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function alpha_1_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function alpha_1_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function eta_c_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function eta_c_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end 104 function eta_tc_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function eta_tc_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function alpha_2_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function alpha_2_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function edit29_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function edit29_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function phi_kk1_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function phi_kk1_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function tkk2_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function tkk2_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function p2_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function p2_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function k2_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function k2_CreateFcn(hObject, eventdata, handles) % See ISPC and COMPUTER if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); 105 end function to_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function to_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function L_ong_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function L_ong_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function n1_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function n1_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function n2_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function n2_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end function So_Callback(hObject, eventdata, handles) % - Executes during object creation, after setting all properties function So_CreateFcn(hObject, eventdata, handles) if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor')) set(hObject,'BackgroundColor','white'); end Phụ lục 12: Mã code giao diện chƣơng trình function varargout = Chuong_trinh_tinh_toan_may_lanh_chan_khong(varargin) % Begin initialization code - DO NOT EDIT gui_Singleton = 1; gui_State = struct('gui_Name', mfilename, 'gui_Singleton', gui_Singleton, 'gui_OpeningFcn', @Chuong_trinh_tinh_toan_may_lanh_chan_khong_OpeningFcn, 'gui_OutputFcn', @Chuong_trinh_tinh_toan_may_lanh_chan_khong_OutputFcn, 'gui_LayoutFcn', [] , 'gui_Callback', []); if nargin && ischar(varargin{1}) gui_State.gui_Callback = str2func(varargin{1}); end 106 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 Chuong_trinh_tinh_toan_may_lanh_chan_khong is made visible function Chuong_trinh_tinh_toan_may_lanh_chan_khong_OpeningFcn(hObject, eventdata, handles, varargin) rgb=imread('So_do_nhiet.jpg'); image(rgb); axis off % Choose default command line output for Chuong_trinh_tinh_toan_may_lanh_chan_khong handles.output = hObject; % Update handles structure guidata(hObject, handles); % - Outputs from this function are returned to the command line function varargout = Chuong_trinh_tinh_toan_may_lanh_chan_khong_OutputFcn(hObject, eventdata, handles) varargout{1} = handles.output; function Untitled_1_Callback(hObject, eventdata, handles) function TT_bom_chan_khong_Callback(hObject, eventdata, handles) Tinh_toan_bom_chan_khong function TT_phu_tai_lanh_Callback(hObject, eventdata, handles) TT_phu_tai_lanh % -function TT_CTL1cap_R22_Callback(hObject, eventdata, handles) TT_CTL_1CAP_R22 % -function ertrey_Callback(hObject, eventdata, handles) % -function TT_dien_tich_truyen_nhiet_DL_Callback(hObject, eventdata, handles) TT_dien_tich_truyen_nhiet_DL 107 PHẦN LÝ LỊCH TRÍCH NGANG Họ tên: VÕ THIỆN MỸ Ngày, tháng, năm sinh: 08/06/1980 Nơi sinh: Tp.HCM Địa liên lạc: 66/51, Phan Sào Nam, P.11, Q.Tân Bình, Tp.HCM Q TRÌNH ĐÀO TẠO 5/ 2003: tốt nghiệp Đại học Bách Khoa Tp.HCM Q TRÌNH CƠNG TÁC 9/2003 đến nay: giảng dạy Trƣờng CĐKT Lý Tự Trọng Tp.HCM ... TÀI: NGHIÊN CỨU ỨNG DỤNG CÔNG NGHỆ LÀM LẠNH CHÂN KHÔNG TRONG VIỆC BẢO QUẢN BẮP II NHIỆM VỤ VÀ NỘI DUNG: - Nghiên cứu ứng dụng công nghệ làm lạnh chân khơng - Viết chƣơng trình tính tốn máy lạnh chân. .. ? ?Nghiên cứu ứng dụng công nghệ làm lạnh chân không việc bảo quản bắp? ?? 1.2 Mục tiêu đề tài Tìm hiểu khả ứng dụng cơng nghệ làm lạnh chân không việc bảo quản rau Viết chƣơng trình tính tốn máy lạnh. .. lạnh chân khơng Matlab Thử nghiệm công nghệ làm lạnh chân không để làm lạnh bắp ngơ Lập mơ hình tốn nhằm mơ nhiệt độ tâm trái bắp theo thời gian làm lạnh chân không 1.3 Đối tƣợng phạm vi nghiên cứu