C_and_CPP 板


LINE

sgesvx_(char *fact, char *trans, integer *n,......real *rcond,) 小弟我要呼叫一个Subroutine来用,名称是:sgesvx_(), 但是sgesvx_("real *rcond,"这一项一直搞不定), source file的说明如下: http://src.wtgstudio.com/?hM3FN4 譬如说, integer *n ,这是要输入的,假设我想输入3,我的作法是: integer *n, n_val=3; n = &n_val; 这样应该没问题 我的问题是, real *rcond ,这是程式计算後会output的结果, 请问我应该如何宣告呢? 麻烦帮个忙,谢谢 --



※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 61.224.82.71
1F:→ james732:real rcond; sgesvx_(&rcond); 是这个意思吗?? 05/08 14:42
2F:→ shaopj:我是这样输入 sgesvx_(n,rcond), n应该没问题 05/08 14:46
3F:→ shaopj:rcond不知道要如何正确宣告 05/08 14:47
4F:推 ledia:不用多一个 n, integer n_val=3, 传 sgesvx_(&n_val); 05/08 15:12
5F:→ ledia:同样的 real 就跟一楼的一样 05/08 15:12
6F:→ shaopj:谢谢..我重弄试试看... 05/08 15:15
7F:→ shaopj:再请问一下,real *a ,a 是一个阵列 ,那该如何input 05/08 15:30
8F:→ shaopj:目前的作法是:real a[3]; a[1]=x,a[2]=x,a[3]=x;sgesvx_(a) 05/08 15:31
9F:→ james732:再把你的问题讲清楚一点好吗?? 05/08 15:37
10F:→ shaopj:嗯嗯 不好意思 05/08 15:40
11F:→ shaopj:a 是一个要input的real array,假设我想输入a=[7 8 9]这个阵 05/08 15:44
12F:→ shaopj:列,我目前的作法是:先宣告real a[3];然後在指派阵列 05/08 15:45
13F:→ shaopj:a[1]=7,a[2]=8,a[3]=9;最後sgesvx_(a) 05/08 15:46
14F:→ shaopj:real a[3]={7,8,9}; sgesvx_(a) 这样可以吗 05/08 15:48
15F:→ shaopj:sgesvx_(里面是不是都放位址,也就是加个&,但阵列怎麽办) 05/08 15:49
16F:推 ledia:阵列就直接放, a[3]; => a 本身就当作位址 05/08 15:52
17F:→ shaopj:所以说sgesvx_(&n,a,&rcond);阵列a就直接放进去,其他加& 05/08 15:56
18F:→ shaopj:那如果我想印出output;例如印rcond; 05/08 15:57
19F:→ shaopj:print("%f",rcond)应该 是这样吧 05/08 15:58
20F:推 ledia:printf ? 怎麽不自己试一试, 等回答应该会比较慢吧? ^^| 05/08 16:15
21F:→ shaopj:我有印啊,只是印出来的答案不如预期,我想确定一下这样印, 05/08 16:18
22F:→ shaopj:有没有错 05/08 16:19
23F:→ shaopj:虽然还是有不少问题,但很谢谢大家的指教,继续努力 05/08 16:21
24F:→ shaopj:我真白痴,忘记印的时候是ferr[0] 搞老半天 多谢ledia大 05/08 18:20
25F:→ shaopj:thanks all!! 05/08 18:25







like.gif 您可能会有兴趣的文章
icon.png[问题/行为] 猫晚上进房间会不会有憋尿问题
icon.pngRe: [闲聊] 选了错误的女孩成为魔法少女 XDDDDDDDDDD
icon.png[正妹] 瑞典 一张
icon.png[心得] EMS高领长版毛衣.墨小楼MC1002
icon.png[分享] 丹龙隔热纸GE55+33+22
icon.png[问题] 清洗洗衣机
icon.png[寻物] 窗台下的空间
icon.png[闲聊] 双极の女神1 木魔爵
icon.png[售车] 新竹 1997 march 1297cc 白色 四门
icon.png[讨论] 能从照片感受到摄影者心情吗
icon.png[狂贺] 贺贺贺贺 贺!岛村卯月!总选举NO.1
icon.png[难过] 羡慕白皮肤的女生
icon.png阅读文章
icon.png[黑特]
icon.png[问题] SBK S1安装於安全帽位置
icon.png[分享] 旧woo100绝版开箱!!
icon.pngRe: [无言] 关於小包卫生纸
icon.png[开箱] E5-2683V3 RX480Strix 快睿C1 简单测试
icon.png[心得] 苍の海贼龙 地狱 执行者16PT
icon.png[售车] 1999年Virage iO 1.8EXi
icon.png[心得] 挑战33 LV10 狮子座pt solo
icon.png[闲聊] 手把手教你不被桶之新手主购教学
icon.png[分享] Civic Type R 量产版官方照无预警流出
icon.png[售车] Golf 4 2.0 银色 自排
icon.png[出售] Graco提篮汽座(有底座)2000元诚可议
icon.png[问题] 请问补牙材质掉了还能再补吗?(台中半年内
icon.png[问题] 44th 单曲 生写竟然都给重复的啊啊!
icon.png[心得] 华南红卡/icash 核卡
icon.png[问题] 拔牙矫正这样正常吗
icon.png[赠送] 老莫高业 初业 102年版
icon.png[情报] 三大行动支付 本季掀战火
icon.png[宝宝] 博客来Amos水蜡笔5/1特价五折
icon.pngRe: [心得] 新鲜人一些面试分享
icon.png[心得] 苍の海贼龙 地狱 麒麟25PT
icon.pngRe: [闲聊] (君の名は。雷慎入) 君名二创漫画翻译
icon.pngRe: [闲聊] OGN中场影片:失踪人口局 (英文字幕)
icon.png[问题] 台湾大哥大4G讯号差
icon.png[出售] [全国]全新千寻侘草LED灯, 水草

请输入看板名称,例如:BuyTogether站内搜寻

TOP