source:
vendors/t/fcm-make/00-build-basic/src/hello.f90
@
10669
Last change on this file since 10669 was 10669, checked in by nicolasmartin, 5 years ago | |
---|---|
File size: 105 bytes |
Line | |
---|---|
1 | program hello |
2 | use world, only: get_world |
3 | WRITE(*, '(A,A)') 'Hello ', trim(get_world()) |
4 | end program hello |
Note: See TracBrowser
for help on using the repository browser.