首页 > 解决方案 > 在打开的 fortran-90 语句中制作修剪方法不起作用

问题描述

在这个子程序中,我尝试设置动态名称。文件名保存完整的字符串。但是,open 语句中的文件没有字符串;'_1809.dat'。

subroutine db_write_matrix(dim,V,name)
    implicit none
    integer :: dim
    real(8) :: V(dim,dim)
    Character(len = 40) :: name
    Character(len = 60) :: filename
    integer :: i,j,u

    filename=trim('db_data/db_'//name//'_1809.dat')
    open(newunit=u, file=filename)
        . . .
    close(u)
    return
end subroutine db_write_matrix

标签: fortran

解决方案


我有解决方案,把

Character(len = *) :: name
Character(len = *) :: filename

filename='db_data/db_'//trim(name)//'_'//'1809.dat'

而不是之前的代码


推荐阅读