source:
vendor/nemo/current/NEMOGCM/EXTERNAL/XIOS/src/xios_server.f90
@
44
Last change on this file since 44 was 44, checked in by cholod, 12 years ago | |
---|---|
File size: 140 bytes |
Line | |
---|---|
1 | PROGRAM server_main |
2 | USE xios |
3 | IMPLICIT NONE |
4 | INCLUDE "mpif.h" |
5 | INTEGER :: ierr |
6 | |
7 | CALL xios_init_server |
8 | |
9 | END PROGRAM server_main |
Note: See TracBrowser
for help on using the repository browser.