arrays - fortran90: 整数配列を異なる構造で出力する

Question

私は整数配列を持っています

int(4) :: idate            ! 1979 March 1st 00hrs

write(*,*)idate            ! prints ' 0 3 1 1979'

idate日付を次のように出力する別の変数(整数/整数配列のみ)に保存したい:

1979030100

文字/文字列に変更せずに。

これはできますか？些細なことでしたら申し訳ありませんが、かなりの時間を費やしました。

Answer 1

次のようなことができます。

integer :: date_as_int
...
date_as_int = idate(1)*10**6 + idate(2)*10**4 + idate(3)*10**2 + idate(4)

あなたも逃げるかもしれません

date_as_int = sum(idate*10**[6,4,2,0])

また

date_as_int = dot_product(idate, 10**[6,4,2,0])

角括弧の構文は Fortran 2003 のものです。古いコンパイラ[6,4,2,0]では、(/6,4,2,0/).