fortran output 弱问题求助 - 未名空间MITBBS历史存档

国际科技财经博客移民网络热点娱乐民生时事公众号

Redian新闻

>未名空间

>Computation - 科学计算

fortran output 弱问题求助

fortran output 弱问题求助# Computation - 科学计算

e*i2015-04-06 07:04

1 楼

因为回国了一次，学校要去我去做TB.
我记得上次护士是在我手臂上鼓包的地方划了条线说我negative了。
可是朋友今天告诉我红点大小是衡量标准，而且看到我手臂上的红点说我肯定positive
了。
我今天下午可以去read,也可以明天去，我想拖到明天，等红点小一点再去。
不知道有没有人知道到底是看红点还是看鼓包啊。谢谢！
ps,我刚刚回国照过片，没有肺结核的，就是怕positive了去照片比较麻烦。

h*a2015-04-06 07:04

2 楼

可以跟 HOME DEPOT直接联系吗？还有没有其他单位？谢谢

b*22015-04-06 07:04

3 楼

p*r2015-04-06 07:04

4 楼

┃熱│寒│亂│風┃
┃酒│衣│吹│叩┃
┃沖│未│黃│牕┃
┃冠│御│葉│扉┃
┃冷│翻│各│夢┃
┃面│箱│西│破┃
┃紅│亂│東│空┃
┃。│，│。│，┃

e*y2015-04-06 07:04

5 楼

文学城应该算是人气一流的海外中文坛子吧，最近改版很多啊。总算有一些social功能
了。公司在加州？

b*t2015-04-06 07:04

6 楼

have a table
col1 col2
a1 b11,b12
a2 b21,b22
...
want to make a new table as
col1 col2
a1 b11
a1 b12
a2 b21
a2 b22
...
how to do this in MySQL?
thanks

c*y2015-04-06 07:04

7 楼

下面这个简单的程序是我问题的简化版。我期待着多个线程可以共享这个变量$locker
，可是看起来似乎每人有一份独立的$locker，为何呢？
my $locker=0;
sub worker
{
my $id=shift;
$locker++;
print "#$id working :$locker\n";
sleep(int(rand(10)));
$locker--;
print "#$id exit :$locker\n";

}
for my $i (1..10)
{
$workers[$i] = threads->create('worker', "$i");
}
for my $i (1..10)
{
$workers[$i]->join();
}
print "over\n";
运行结果是：
#1 working :1
#2 working :1
#2 exit :0
#3 working :1
#4 working :1
#5

B*N2015-04-06 07:04

8 楼

关于宇宙，到底是个什么东西？有边界吗？
请大侠发表意见。

l*u2015-04-06 07:04

9 楼

一串数字output，每个数字宽度不一样，但要求都间隔一个空格
比如 12,2.3,4000,500.000，要output成
——————————————————————
12 2.3 4000 500.000
——————————————————————
应该怎么控制？默认输出的话每两个数字中间是个tab
包子感谢！

f*I2015-04-06 07:04

10 楼

positive
the diameter of the induration

【在 e*****i 的大作中提到】

: 因为回国了一次，学校要去我去做TB.
: 我记得上次护士是在我手臂上鼓包的地方划了条线说我negative了。
: 可是朋友今天告诉我红点大小是衡量标准，而且看到我手臂上的红点说我肯定positive
: 了。
: 我今天下午可以去read,也可以明天去，我想拖到明天，等红点小一点再去。
: 不知道有没有人知道到底是看红点还是看鼓包啊。谢谢！
: ps,我刚刚回国照过片，没有肺结核的，就是怕positive了去照片比较麻烦。

s*o2015-04-06 07:04

11 楼

倒出去，重新IMPORT进来，然后INSERT INTO TARGET TABLE
QUESTION WHAT IF DUPLICATE
col1 col2
a1 b11
a1 b11
a1 b11
a1 b12
a2 b21
a2 b22

j*a2015-04-06 07:04

12 楼

看文档啊
http://perldoc.perl.org/threads.html
DESCRIPTION
Perl 5.6 introduced something called interpreter threads. Interpreter
threads are different from 5005threads (the thread model of Perl 5.005) by
creating a new Perl interpreter per thread, and not sharing any data or
state between threads by default.

locker

【在 c**y 的大作中提到】

: 下面这个简单的程序是我问题的简化版。我期待着多个线程可以共享这个变量$locker
: ，可是看起来似乎每人有一份独立的$locker，为何呢？
: my $locker=0;
: sub worker
: {
: my $id=shift;
: $locker++;
: print "#$id working :$locker\n";
: sleep(int(rand(10)));
: $locker--;

a*r2015-04-06 07:04

13 楼

http://www.phyw.com/wytk/wzhyl/qin%20junshan/zhkhdxx.htm
物理科学探疑-网友天空-物质原理-真空→黑洞→星系--重建辩证唯物主义的宇宙论
真空→黑洞→星系
——重建辩证唯物主义的宇宙论
秦军山
关键词:真空量子漩涡巨黑洞类星体
内容提要：本文坚持辩证唯物主义的宇宙观，针对现有的宇宙论的缺陷重新阐述了时空
的无限性和物
质的统一性；本文提出了对星系谱线红移的另一种理解，导出了一个减速膨胀着的宇宙
模型，认为宇
宙的演化经历了一个由“真空→黑洞→类星体→星系”的漫长的过程，物质宇宙的出现
只是整个宇宙演化
过程中的短短一瞬，宇宙的诞生及演化也只是真空属性的不同表现形式而已；本文提出
了一个“量子→
电子→质子”的物质创生过程，认为所有的物质（包括各种作用力、场、基本粒子）都
是量子运动的不
同表现形式。
一、对星系谱线位移的不同理解
二十年代末，哈勃先生在总结遥远星系的观测资料时，发现所有星系的谱线都发生
了位移，并且
其位移量的大小与我们之间的距离成正比,据此，哈勃先生提出：我们的宇宙是一个正
在膨胀着的宇
宙，并且，距离我们越远的星系，逃离我们的速度越快。既然，我们的宇宙正在膨胀，
那么，它在很
久以前就必定是聚集在一个“点”上的，由此，大爆炸宇宙论诞生了。
大爆炸宇宙论由于在宇宙膨胀，元素丰度，背景辐射等观测事实方面的成功，而被
尊称为标准宇
宙论。然而，这个宇宙理论随着人们对宇宙认识的不断深入，已越来越不适应于现代宇
宙学、物理学
的发展，缺陷和矛盾也显得日益突出。
种种的困惑，种种的矛盾，大爆炸论究竟出了什么问题呢？我们不妨回头看一看，
那个使大爆炸
宇宙论得以建立的哈勃定律。
当年，哈勃先生发现星系谱线的位移量与我们之间的距离成正比后，即作出了一个
纯粹是空间意
义的结论：距离我们越远的星系，退行的速度就越快。这个结论实际上只是一个直觉的
判断，如果使
这个判断成为一个定律的话，则必须满足两个先决条件：（1）、我们的银河系正好处
于宇宙的中心；
（2）、星系的速度必须始终保持恒定。但是这两个先决条件都是没有理由成立的。
在宇宙观测中，由于光速的限制，任何观测都具有空间和时间的双重意义，距离的
大小就依谓着
时间的长短。所以我们对观察事实，应该进行时间和空间两个方面的理解，比如说，我
们观察到一颗
距离我们120亿光年、红移量为4.43的类星体，从空间的角度来看，我们可以这样说：
这颗距离我们
120亿光年的类星体，正在以0.9C(光速)的速度远离我们而去；这是一种空间性的理解
，而从时间的
角度来理解的话，我们则只能说:这颗类星体在120亿年前、曾以0.9C的速度离开我们，
而现在它以
什么速度离开我们，我们则不知道，因为我们看不到它现在所处的位置，更观测不到它
现在离开我们
的速度。
同理，如果我们从时间的角度来理解星系谱线的位移规律，则哈勃定律应表述为：
越古老的星系
膨胀的速度就越快；同理哈勃常数的含义也可以这样描述：以观察者的时间坐标为原点
，时间每向过
去追逆30万年，星系的膨胀速度就加快50公里/秒（假定H值为50），换个说法就成了：
每过30万
年，宇宙的膨胀速度就降低50公里/秒。这样我们则得出一个均匀地作着减速膨胀运动
的宇宙模型,这
个宇宙模型并不需要宇宙有一个中心点。
实际上，对星系谱线位移规律作出时间性的定义，是更接近于事实的，这样的理解
可使我们更客
观地看待观测事实，从而放弃那种“眼见为实”的错误直觉。由此，我们对目前宇宙的
认识将发生一个
根本性地转变，即我们的宇宙并非在空间轴上，每深入百万秒差距，膨胀速度就加快50
公里/秒，而
是在时间轴上每隔30万年，宇宙的膨胀速度就降低50公里/秒。
基于这样的认识，我们应该重新考虑宇宙的膨胀问题，因为宇宙在作着减速膨胀运
动，毫无疑问
早期宇宙是膨胀着的，那现在的宇宙还在膨胀吗？我们还能以120亿年前的类星体作参
照标准吗？同
样，大爆炸论者根据哈勃常数和“减速参量”，计算出的宇宙年龄，也不得不重新考虑
，因为那个年龄
实际上只是假设宇宙以近于光速膨胀到趋于停止所需要的时间间隔，这个间隔并非宇宙
的年龄。
二,从无限的时空中诞生的宇宙
——一个哲学意义的宇宙论假说
对宇宙起源问题的思考，本来是哲学研究的根本命题，现在却不得不让位于越来越
专业化的现代
宇宙学，而走出哲学观的现代宇宙学又是怎么回答这一根本命题的呢？宇宙学家告诉我
们:物质从“奇
点”处无缘无故地诞生，又从”黑洞”里无影无踪地消失;这样的回答，是否也预示着
现代宇宙学的困境
呢？
辩证唯物主义哲学论认为:宇宙在时间上是无始无终的，在空间上是无边无界的，
宇宙应该是一
种在无限的时空中不断演化的物质存在，而现代宇宙学则认为宇宙在时间上是有始有终
的，在空间上
是无边而有界的，认为时空从“奇点”处诞生后，最终仍会终结于“奇点”。
为了避免哲学意义上使宇宙具有开端或终结的“奇点”，史蒂芬.霍金引入了虚时
间这样一个概
念。霍金教授认为实时间只不过是我们发明的用来帮助我们描述宇宙面目的一种观念，
而虚时间才是
真正的基本的时间，在虚时间里，没有科学定律失效的奇点，也没有人们需要企求上帝
的宇宙边缘。
宇宙即不创生也不毁灭，它就是存在（摘自《时间简史续论》）。霍金教授的这段话无
疑是现代宇宙
学在认识上的一个飞跃,，是很接近于唯物主义宇宙观的，但虚时间却是一种我们不可
理解的时间，在
我们可认识可测量的实时间中，宇宙仍是有开端和终结的。
那么，我们能不能用现代宇宙学物理学的已有成果，以哲学的方式，推出一个没有
开端，也没有
边界的宇宙呢？我们的推论分为如下几个步骤：
真空宇宙阶段：
大约在1010000年前（这个数字只是无限的代名词），我们的宇宙中，只有无法测
量的时空存
在，这个存在就是无限的真空。我们无法确定它的大小，亦无法想象它存在了多长时间
，这就是真空
宇宙。
真空无疑是一无所有之处，但是在量子力学看来，真空却是一个动荡不安的世界，
那里能量在不
断地创生着粒子，粒子又不断地覆灭而复归为能量。我们可以把真空看作是由无数的量
子作杂乱无章
的运动而构成的一种状态，在量子力学看来，真空是一种处于基态的场；而从热力学的
角度来看，真
空则是一个达到了极限的无序系统。
量子力学认为量子的行为只能按几率的原则进行预测，真空既然也是一个量子系统
，那么这个量
子系统的演化也将向几率较大的“态”发展，在这个量子系统中，什么样的“态”几率
最大呢？在一个较
小的范围内，使这个量子系统产生有序行为，显然是需要外力作用才行的，但在真空宇
宙中，这种外
力是不存在的，因此其几率为零。我们的目光只能放在一个很大的尺度上，这个尺度必
须大到使量子
行为不发生因果联系才行，这个尺度应该在几千亿光年左右。
经过选择，在这个宇宙中，量子发生大规模扰动的几率较大。尽管这种扰动的几率
是个很小的
值，但经过漫长的时间演化，在真空宇宙中还是形成了这样一个巨大的量子扰动结构。
有了量子扰动
这样一个有序结构，真空宇宙中引力也随之诞生了。其实，在量子力学看来，大尺度上
的真空产生出
这样一个量子有序结构，应该是一个必然结果，可惜本文无能给出这样的一个宇宙波涵
数。
量子旋涡阶段：
大约在101000年前，由于宇宙中引力的存在，在引力的作用下，那个巨大的量子扰
动结构逐步
分化成了无数较小的量子旋涡，这些量子旋涡的直径约在二、三十万光年左右，它们由
无数的量子作
封闭的圆周运动而形成。这些量子本身虽然不具有静止质量，但它们的封闭圆周运动却
在空间中激发
出了引力场，因而这些量子旋涡是具有静止质量的。
如果我们把量子旋涡的直径看作是每个量子的波长，那么一个量子旋涡的静止质量
就可以由相对
论的质能关系式表述如下：
M=KH/RC
式中，M为旋涡的静止质量，K为这个旋涡包含的量子数，R为旋涡直径，C为光速。H为
普朗克常数。
从这个关系式中不难看出，当一个量子旋涡包含的量子数一定时，量子旋涡的质量与量
子旋涡的直径
成反比。
最初的量子旋涡所具有的静止质量是很小的，虽然质量很小，但由于引力的作用，
这些量子旋涡
还是在作着缓慢的收缩运动。随着旋涡直径的缩小，量子旋涡的静止质量逐步增大。
同时，随着这些
量子旋涡质量的增大，整个宇宙的引力也增大，在引力的作用下，整个宇宙开始收缩。
而这种收缩运
动又导致了旋涡之间的相互运动速度，使它们之间的离心力也随之增加。
黑洞宇宙阶段：
大约在10100年前，那些旋涡陆续演化成了与现代宇宙学中称为巨黑洞的天体很类
似的天体（这
种天体以下简称为巨黑洞，但它与现代宇宙学所预言的巨黑洞是有区别的）。
这些巨黑洞具有异常强大的引力场和极大的静止质量，它们的质量都在1014——
1016个太阳质量
之间，但它们的体积却比地球还小。这时的宇宙仍是一个漆黑冰冷的世界。
在现代宇宙学理论中，黑洞被看作是一个引力场异常强大的点，它被一个叫事件视
界的球面所包
围，任何东西（包括光子）一旦越过这个事件视界就再也无法逃出。后来霍金教授经过
计算指出，黑
洞并非绝对的黑体，而是可以通过辐射而最终蒸发掉自己的，这就是霍金辐射，霍金还
认为黑洞越
小，则霍金辐射量越大，而黑洞收缩得越快，随着黑洞的最终蒸发，它将消失在一次剧
烈的爆炸中。
遗憾的是霍金教授认为只有质量较小的黑洞，才会在我们的宇宙年龄里发生爆炸，要是
换成本文所述
的这种具有一个星系质量的巨黑洞，大概是永远也不会发生爆炸的。
对此本文对黑洞理论是持不同观点的：
（1）、本文认为，黑洞之所以不发光，并不仅仅是引力场异常强大的缘故，而是
因为黑洞是一
个高度有序的量子旋涡，任何物质掉入这样的旋涡中，都会被很快地粉粹、整理成有序
的量子行为，
因此，在这个旋涡中光波是没有传播和发射条件的。
（2）、黑洞内的每个量子都在作高速旋转运动，都具有一定的动量，每个量子也
具有一个相应
的离心力，这种离心力会阻止黑洞无限收缩，要使黑洞抗拒住这种离心力而继续收缩，
黑洞必须要有
足够大的质量，才能使黑洞发生爆炸。黑洞应具有一个能发生爆炸的质量临界点。因此
，本文认为只
有大质量的黑洞才会发生爆炸，而小质量的黑洞则会较稳定地存在下去，除非它不断吞
食物质，使自
身质量大于“临界点”。
物质宇宙的诞生：
在1000亿年前到100亿年前之间，随着巨黑洞质量的增大，整个宇宙收缩到了一个
更小的空间
中，巨黑洞之间的相互运动也变得更加活跃繁杂。此时，约有十分之一的巨黑洞内陆续
发生了一种奇
特的能质爆炸而变成了异常明亮的类星体，类星体熄灭后星系诞生了。由于类星体的爆
发使原巨黑洞
具有的部分质量转化成了物质，还有相当一部分则转化成了光子和其它一些没有静止质
量的场。这样
整个宇宙的引力与离心力又发生了相反的失衡，从而导致了整个宇宙的膨胀。在膨胀的
同时，被类星
体抛出的电离氢、氦气体云，开始凝聚，最终形成了星系，我们的宇宙诞生了。
三、神秘的类星体
在本文中，类星体无疑代替了大爆炸论“奇点”的位置，那么类星体又是如何制造
出物质的呢？
公认的理论认为，类星体是由一个巨大的旋转的黑洞和正在降落上去的物质形成的
，在物质落到
黑洞里面之前，会变得非常热并发射出大量能量。
这样的解释显然是不符合观测事实的，事实上，类星体不仅不吞食物质，相反却在
大量地向外抛
射物质，另外，类星体发出的耀眼光芒也绝非黑洞吞食物质时所发出的那种X射线。另
外，即然认为类
星体是由巨黑洞和塌缩的星系组成,那么，类星

【在 B******N 的大作中提到】

: 关于宇宙，到底是个什么东西？有边界吗？
: 请大侠发表意见。

e*i2015-04-06 07:04

14 楼

哦。这样啊。我一点硬块都没有呢。就是个红斑。谢谢！！！明天放心去read了，今天
人家已经下班了。:)

【在 f******I 的大作中提到】

:
: positive
: the diameter of the induration

y*w2015-04-06 07:04

15 楼

发包子吧，这个板上人们都腻歪做作业了。

【在 b******t 的大作中提到】

: have a table
: col1 col2
: a1 b11,b12
: a2 b21,b22
: ...
: want to make a new table as
: col1 col2
: a1 b11
: a1 b12
: a2 b21

B*N2015-04-06 07:04

16 楼

起源于无限的真空？还是无限的暗物质（黑洞）？
觉得地球已经地球上生命的这种存在简直太伟大了。

【在 a*******r 的大作中提到】

:
: http://www.phyw.com/wytk/wzhyl/qin%20junshan/zhkhdxx.htm
: 物理科学探疑-网友天空-物质原理-真空→黑洞→星系--重建辩证唯物主义的宇宙论
: 真空→黑洞→星系
: ——重建辩证唯物主义的宇宙论
: 秦军山
: 关键词:真空量子漩涡巨黑洞类星体
: 内容提要：本文坚持辩证唯物主义的宇宙观，针对现有的宇宙论的缺陷重新阐述了时空
: 的无限性和物
: 质的统一性；本文提出了对星系谱线红移的另一种理解，导出了一个减速膨胀着的宇宙

b*t2015-04-06 07:04

17 楼

导出去的话会弄，不倒不行？

t*e2015-04-06 07:04

18 楼

个人觉得，所谓“宇宙”只是人的一种认识。所以人能够认识多少，宇宙就有多大。就
好象一只蚂蚁觉得他爬的那棵树就是宇宙。

【在 B******N 的大作中提到】

: 起源于无限的真空？还是无限的暗物质（黑洞）？
: 觉得地球已经地球上生命的这种存在简直太伟大了。

b*t2015-04-06 07:04

19 楼

好啊，包子什么价啊，我只有伪币0.8都给你，

【在 y****w 的大作中提到】

: 发包子吧，这个板上人们都腻歪做作业了。

S*n2015-04-06 07:04

20 楼

Oh my gosh!

【在 a*******r 的大作中提到】

s*o2015-04-06 07:04

21 楼

不倒就是要搞字符串处理，然后INSERT

S*n2015-04-06 07:04

22 楼

"如果使这个判断成为一个定律的话，则必须满足两个先决条件：（1）、我们的银河系
正好处于宇宙的中心；
（2）、星系的速度必须始终保持恒定。但是这两个先决条件都是没有理由成立的。"
刚读到这儿, 就读不下去了...

m*22015-04-06 07:04

23 楼

pivot and unpivot

y*g2015-04-06 07:04

24 楼

My solution is only work for fixed number of values in the col2,
for simplicity, if there is only 2 values in col2,
the following works:
insert into combined select a.col1, substring_index(a.col2,',',1) from
mytest a union all select b.col1,substring_index(b.col2,',',-1) from mytest
b;
mysql> select * from newt order by col1;
+------+-------------------------------+
| col1 | substring_index(a.col2,',',1) |
+------+-------------------------------+
| a1 | b11 |
| a1 | b12 |
| a2 | b21 |
| a2 | b22 |
+------+-------------------------------+
4 rows in set (0.04 sec)