use of enum() and format() in fortran

[byter101]

hello,

how does an "enum" array work, as in below? I understand the exp() function.

enum(i)=enum(i)*exp(-0.8/24)

there's a simpler line elsewhere:
enum(i)=0
but i can't figure it out.

additionally, what is "format()" doing, what purpose does that darn 1007 serve, and what would this potentially affect in my code?:

1007 format(i4,1x,i4,1x,a3,1x,e12.6)

optionally, if there is anyone who knows C++, how would I translate these statements over? I will probably be able to figure it out when I know how they work, but there's usually good advice out there
thank you

 

[mikrom]

1007 is numeric identifier for the format, the descriptors mean:
i - integer
x - space
a - alphanumeric
E - exponencial

For example this Fortran-code
format.f90

write (*, 1007) 1234, 5678, 'abc', 1.41
1007     format(i4,1x,i4,1x,a3,1x,ES12.5e3)
end

is equivalent with this C-code
format.c

int main() {
  printf("%4d %4d %3s %12.5E\n", 1234, 5678, "abc", 1.41);
}

because they produces the same output

$ g95 format.f90 -o formatf

$ gcc format.c -o formatc

$ formatf
1234 5678 abc 1.41000E+000

$ formatc
1234 5678 abc 1.41000E+000

 

[BrooksVH]

The enum(i) is just the ith element of an array called enum.

Brooks

 

[byter101]

but i don't have an 'enum' array declared anywhere, and it shows up in blue in the IDE like its a data type or cast or something..

 

[byter101]

okay it is just an array; i missed it. Its just weird that it shows up a different color in the editor. oh well, thanks guys