/* * $Header: /home/ubuntu/mnt/e9_copy/MITgcm_contrib/MPMice/beaufort/code/setdir_ocean.c,v 1.1 2009/05/31 03:41:36 dimitri Exp $ * $Name: $ */ #include #include void setdir_ocean_( ) { char RUN_DIR[1024]; char *rundirsetting; char *SROOT; char *SPREF; char *scycle; char *endPtr; char SROOT_BUFFER[1024]; int rc; int sDirNum; int sDirCycle; sprintf(RUN_DIR,"ocean"); rc = chdir(RUN_DIR); /* perror(strerror(rc)); exit(-1); */ }