资源简介

用MATLAB做的激光课程设计:菲涅尔衍射迭代法分析谐振腔光场分布。有GUI界面,圆形腔、矩形腔、腔的大小、波长、腔长、迭代精度可调。做这个课程设计的同学,可以互相学习学习。

资源截图

代码片段和文件信息

/*
 * MATLAB Compiler: 4.3 (R14SP3)
 * Date: Mon Apr 27 03:28:23 2009
 * Arguments: “-B“ “macro_default“ “-m“ “-W“ “main“ “-T“ “link: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\database.jar

     文件       2440  2009-04-27 02:45  LaserDesgin_mcr\LaserDesgin_E8BA466D9E645786D6BC5C79C25AA550\compopts.bat

     文件        739  2009-04-27 03:14  LaserDesgin_mcr\LaserDesgin_E8BA466D9E645786D6BC5C79C25AA550\MATLAB EditorDesktop.xml

     文件       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\database\database\@cursor\attr.m

     文件        929  2005-06-16 07:44  LaserDesgin_mcr\toolbox\database\database\@cursor\close.m

     文件       1199  2002-06-17 08:01  LaserDesgin_mcr\toolbox\database\database\@cursor\cols.m

     文件       1274  2005-06-16 07:44  LaserDesgin_mcr\toolbox\database\database\@cursor\columnnames.m

     文件        929  2003-08-29 00:45  LaserDesgin_mcr\toolbox\database\database\@cursor\Contents.m

     文件       2189  2004-04-05 21:05  LaserDesgin_mcr\toolbox\database\database\@cursor\cursor.m

     文件       3119  2005-06-16 07:44  LaserDesgin_mcr\toolbox\database\database\@cursor\fetch.m

     文件       1109  2002-06-17 08:01  LaserDesgin_mcr\toolbox\database\database\@cursor\get.m

     文件       1094  2005-06-16 07:44  LaserDesgin_mcr\toolbox\database\database\@cursor\querytimeout.m

     文件       1334  2004-04-05 21:05  LaserDesgin_mcr\toolbox\database\database\@cursor\rowlimit.m

     文件       1049  2004-04-05 21:05  LaserDesgin_mcr\toolbox\database\database\@cursor\rows.m

     文件       1199  2005-06-16 07:44  LaserDesgin_mcr\toolbox\database\database\@cursor\set.m

............此处省略75个文件信息

评论

共有 条评论