-
大小: 305.41 KB文件類型: .rar金幣: 2下載: 1 次發(fā)布日期: 2024-08-30
- 語言: Matlab
- 標(biāo)簽: 諧振腔??課程設(shè)計(jì)??matlab??源代碼??
資源簡介
用MATLAB做的激光課程設(shè)計(jì):菲涅爾衍射迭代法分析諧振腔光場分布。有GUI界面,圓形腔、矩形腔、腔的大小、波長、腔長、迭代精度可調(diào)。做這個課程設(shè)計(jì)的同學(xué),可以互相學(xué)習(xí)學(xué)習(xí)。
代碼片段和文件信息
/*
?*?MATLAB?Compiler:?4.3?(R14SP3)
?*?Date:?Mon?Apr?27?03:28:23?2009
?*?Arguments:?“-B“?“macro_default“?“-m“?“-W“?“main“?“-T“?“l(fā)ink:exe“
?*?“LaserDesgin.m“?“LaserDesgin.m“?“LaserDesgin.fig“?“RectIterate3.m“
?*?“CircIterate.m“?“CylinderMesh.m“?
?*/
#include?
#include?“mclmcr.h“
#ifdef?__cplusplus
extern?“C“?{
#endif
extern?mclComponentData?__MCC_LaserDesgin_component_data;
#ifdef?__cplusplus
}
#endif
static?HMCRINSTANCE?_mcr_inst?=?NULL;
static?int?mclDefaultPrintHandler(const?char?*s)
{
????return?fwrite(s?sizeof(char)?strlen(s)?stdout);
}
static?int?mclDefaultErrorHandler(const?char?*s)
{
????int?written?=?0?len?=?0;
????len?=?strlen(s);
????written?=?fwrite(s?sizeof(char)?len?stderr);
????if?(len?>?0?&&?s[?len-1?]?!=?‘\n‘)
????????written?+=?fwrite(“\n“?sizeof(char)?1?stderr);
????return?written;
}
/*?This?symbol?is?defined?in?shared?libraries.?Define?it?here
?*?(to?nothing)?in?case?this?isn‘t?a?shared?library.?
?*/
#ifndef?LIB_LaserDesgin_C_API?
#define?LIB_LaserDesgin_C_API?/*?No?special?import/export?declaration?*/
#endif
LIB_LaserDesgin_C_API?
bool?LaserDesginInitializeWithHandlers(
????mclOutputHandlerFcn?error_handler
????mclOutputHandlerFcn?print_handler
)
{
????if?(_mcr_inst?!=?NULL)
????????return?true;
????if?(!mclmcrInitialize())
????????return?false;
????if?(!mclInitializeComponentInstance(&_mcr_inst
????????????????????????????????????????&__MCC_LaserDesgin_component_data
????????????????????????????????????????true?NoobjectType?ExeTarget
????????????????????????????????????????error_handler?print_handler))
????????return?false;
????return?true;
}
LIB_LaserDesgin_C_API?
bool?LaserDesginInitialize(void)
{
????return?LaserDesginInitializeWithHandlers(mclDefaultErrorHandler
?????????????????????????????????????????????mclDefaultPrintHandler);
}
LIB_LaserDesgin_C_API?
void?LaserDesginTerminate(void)
{
????if?(_mcr_inst?!=?NULL)
????????mclTerminateInstance(&_mcr_inst);
}
int?run_main(int?argc?const?char?**argv)
{
????int?_retval;
????/*?Generate?and?populate?the?path_to_component.?*/
????char?*path_to_component?=?separatePathName(argv[0]);
????__MCC_LaserDesgin_component_data.path_to_component?=?path_to_component;?
????if?(!LaserDesginInitialize())?{
????????free(path_to_component);
????????return?-1;
????}
????_retval?=?mclMain(_mcr_inst?argc?argv?“LaserDesgin“?1);
????if?(_retval?==?0?/*?no?error?*/)?mclWaitForFiguresToDie(NULL);
????LaserDesginTerminate();
????free(path_to_component);
????mclTerminateApplication();
????return?_retval;
}
int?main(int?argc?const?char?**argv)
{
????if?(!mclInitializeApplication(
????????__MCC_LaserDesgin_component_data.application_options
????????__MCC_LaserDesgin_component_data.application_option_count))
????????return?0;
????
????return?mclRunMain(run_main?argc?argv);
}
?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????文件????????475??2009-04-27?04:05??說明.txt
?????文件??????26359??2005-08-05?20:53??LaserDesgin_mcr\java\jar\toolbox\databa
?????文件???????2440??2009-04-27?02:45??LaserDesgin_mcr\LaserDesgin_E8BA466D9E645786D6BC5C79C25AA550\compopts.bat
?????文件????????739??2009-04-27?03:14??LaserDesgin_mcr\LaserDesgin_E8BA466D9E645786D6BC5C79C25AA550\MATLAB?EditorDesktop.xm
?????文件???????1732??2009-04-27?03:20??LaserDesgin_mcr\LaserDesgin_E8BA466D9E645786D6BC5C79C25AA550\matlab.prf
?????文件???????2444??2005-08-05?20:28??LaserDesgin_mcr\toolbox\compiler\deploy\deployprint.m
?????文件??????10578??2004-08-23?19:04??LaserDesgin_mcr\toolbox\compiler\deploy\FigureMenuBar.fig
?????文件???????6937??2004-08-23?19:04??LaserDesgin_mcr\toolbox\compiler\deploy\FigureToolBar.fig
?????文件???????1079??2004-07-16?14:32??LaserDesgin_mcr\toolbox\compiler\deploy\fopen.m
?????文件???????2414??2003-12-19?16:58??LaserDesgin_mcr\toolbox\compiler\deploy\hgrc.m
?????文件????????884??2005-06-24?17:03??LaserDesgin_mcr\toolbox\compiler\deploy\input.m
?????文件???????2699??2005-06-24?17:03??LaserDesgin_mcr\toolbox\compiler\deploy\matlabrc.m
?????文件????????824??2005-06-24?17:03??LaserDesgin_mcr\toolbox\compiler\deploy\pause.m
?????文件????????854??2005-08-05?20:28??LaserDesgin_mcr\toolbox\compiler\deploy\printdlg.m
?????文件???????5632??2005-07-27?21:12??LaserDesgin_mcr\toolbox\compiler\deploy\readline.mexw32
?????文件????????629??2009-04-27?03:28??LaserDesgin_mcr\toolbox\compiler\deploy\readline_mexw32.auth
?????文件????????749??2004-04-16?18:01??LaserDesgin_mcr\toolbox\compiler\dirname.m
?????文件???????8720??2005-07-20?17:17??LaserDesgin_mcr\toolbox\compiler\ja\xlate
?????文件???????2654??2005-06-16?07:44??LaserDesgin_mcr\toolbox\databa
?????文件????????929??2005-06-16?07:44??LaserDesgin_mcr\toolbox\databa
?????文件???????1199??2002-06-17?08:01??LaserDesgin_mcr\toolbox\databa
?????文件???????1274??2005-06-16?07:44??LaserDesgin_mcr\toolbox\databa
?????文件????????929??2003-08-29?00:45??LaserDesgin_mcr\toolbox\databa
?????文件???????2189??2004-04-05?21:05??LaserDesgin_mcr\toolbox\databa
?????文件???????3119??2005-06-16?07:44??LaserDesgin_mcr\toolbox\databa
?????文件???????1109??2002-06-17?08:01??LaserDesgin_mcr\toolbox\databa
?????文件???????1094??2005-06-16?07:44??LaserDesgin_mcr\toolbox\databa
?????文件???????1334??2004-04-05?21:05??LaserDesgin_mcr\toolbox\databa
?????文件???????1049??2004-04-05?21:05??LaserDesgin_mcr\toolbox\databa
?????文件???????1199??2005-06-16?07:44??LaserDesgin_mcr\toolbox\databa
............此處省略75個文件信息
評論
共有 條評論