Parent Directory
|
Revision Log
|
Revision Graph
Saving code and input files, which had been used for test coupling of MITgcm with MPMice and which were formely available at http://ecco2.jpl.nasa.gov/data1/beaufort/
1 | dimitri | 1.1 | /* |
2 | * $Header: $ | ||
3 | * $Name: $ | ||
4 | */ | ||
5 | |||
6 | #include <stdlib.h> | ||
7 | #include <unistd.h> | ||
8 | |||
9 | void setdir_ocean_( ) | ||
10 | { | ||
11 | char RUN_DIR[1024]; | ||
12 | char *rundirsetting; | ||
13 | char *SROOT; | ||
14 | char *SPREF; | ||
15 | char *scycle; | ||
16 | char *endPtr; | ||
17 | char SROOT_BUFFER[1024]; | ||
18 | int rc; | ||
19 | int sDirNum; | ||
20 | int sDirCycle; | ||
21 | |||
22 | sprintf(RUN_DIR,"ocean"); | ||
23 | rc = chdir(RUN_DIR); | ||
24 | /* perror(strerror(rc)); | ||
25 | exit(-1); */ | ||
26 | } |
ViewVC Help | |
Powered by ViewVC 1.1.22 |