Fortran Coder

标题: 怎么输出时去掉整型变量前面的空格？ [打印本页]

作者: mastergxm 时间: 2020-11-15 08:41
标题: 怎么输出时去掉整型变量前面的空格？
Integer(kind=4), Allocatable :: Elem2Nod(:,:)

Write(21,*)Elem2Nod(temp_i,1),Elem2Nod(temp_i,2),Elem2Nod(temp_i,3)

上面只是关键代码，并未列出全部。
输出的三个整数，每个整数的前面都有很长的空格，但是因为这些整数的变化范围很大，并不能确定有几位数，可否有办法，将它们前面的空格去掉？

作者: caiqingdong 时间: 2020-11-15 09:21
先写到一个字符变量中，然后将字符变量中的空格去掉。

作者: 青衣巷 时间: 2020-11-15 10:50
Write(21,'(*(g0,1x))') Elem2Nod(temp_i,1:3)

作者: mastergxm 时间: 2020-11-16 08:31

青衣巷发表于 2020-11-15 10:50
Write(21,'(*(g0,1x))') Elem2Nod(temp_i,1:3)

采用“g0”，0表示没有宽度？可行吗？

作者: mastergxm 时间: 2020-11-16 08:34

caiqingdong 发表于 2020-11-15 09:21
先写到一个字符变量中，然后将字符变量中的空格去掉。

write(filename1,'(I10)')Elem2Nod(temp_i,1)
非常感谢，在网上找到类似上面的关键代码，已经实现目标。谢谢！

作者: 青衣巷 时间: 2020-11-16 09:02

mastergxm 发表于 2020-11-16 08:31
采用“g0”，0表示没有宽度？可行吗？

just try it~

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)