Fortran Coder

楼主: 自由浮尘
打印 上一主题 下一主题

[通用算法] 冒泡排序改为快速排序

[复制链接]

6

帖子

1

主题

0

精华

入门

F 币
64 元
贡献
31 点
11#
 楼主| 发表于 2017-8-5 10:17:55 | 只看该作者
爱人同志 发表于 2017-7-30 20:40
为什么不恢复我啊,早点添加吧

您好,不好意思,最近出去了一段时间,这会才看到,多多交流

3

帖子

0

主题

0

精华

新人

F 币
29 元
贡献
9 点
12#
发表于 2018-1-8 09:19:10 | 只看该作者
请问,PSCAD中怎么修改fortran程序,组件中fortran程序有注释为软件自动生成(修改也无用)。求解答!!!谢谢

3

帖子

0

主题

0

精华

新人

F 币
29 元
贡献
9 点
13#
发表于 2018-1-8 09:38:37 | 只看该作者
是不是组件的代码是系统默认生成,而只能自己编写或写该元件的代码???求解答,谢谢

490

帖子

4

主题

0

精华

大宗师

F 币
3298 元
贡献
1948 点

水王勋章元老勋章热心勋章

14#
发表于 2018-1-8 10:35:10 | 只看该作者
本帖最后由 pasuka 于 2018-1-8 10:38 编辑
飞龙在天 发表于 2018-1-8 09:38
是不是组件的代码是系统默认生成,而只能自己编写或写该元件的代码???求解答,谢谢 ...

建议调用C或C++标准里面提供的排序方法,稳定性与可靠性有保证,效率不一定最优譬如C可以选择
http://en.cppreference.com/w/c/algorithm/qsort
[C] 纯文本查看 复制代码
#include <stdio.h>
#include <stdlib.h>
#include <limits.h>
 
int compare_ints(const void* a, const void* b)
{
    int arg1 = *(const int*)a;
    int arg2 = *(const int*)b;
 
    if (arg1 < arg2) return -1;
    if (arg1 > arg2) return 1;
    return 0;
 
    // return (arg1 > arg2) - (arg1 < arg2); // possible shortcut
    // return arg1 - arg2; // erroneous shortcut (fails if INT_MIN is present)
}
 
int main(void)
{
    int ints[] = { -2, 99, 0, -743, 2, INT_MIN, 4 };
    int size = sizeof ints / sizeof *ints;
 
    qsort(ints, size, sizeof(int), compare_ints);
 
    for (int i = 0; i < size; i++) {
        printf("%d ", ints[i]);
    }
 
    printf("\n");
}

C++对应的是
http://en.cppreference.com/w/cpp/algorithm/sort

3

帖子

0

主题

0

精华

新人

F 币
29 元
贡献
9 点
15#
发表于 2018-1-10 10:00:07 | 只看该作者
谢谢答复,好人。

1

帖子

0

主题

0

精华

新人

F 币
19 元
贡献
4 点
16#
发表于 2018-5-8 22:17:48 | 只看该作者
老哥 ,我可能跟你研究的一样的东西,MMC直流输电是不,加我QQ527752054咱们讨论一下吧
您需要登录后才可以回帖 登录 | 极速注册

本版积分规则

捐赠本站|Archiver|关于我们 About Us|小黑屋|Fcode ( 京ICP备18005632-2号 )

GMT+8, 2024-11-1 09:01

Powered by Tencent X3.4

© 2013-2024 Tencent

快速回复 返回顶部 返回列表