Legend:
- Unmodified
- Added
- Removed
-
trunk/src
- Property svn:ignore
-
old new 1 1 sinobad 2 Yworkdir
-
- Property svn:ignore
-
trunk/src/Yworkdir
- Property svn:ignore
-
old new 1 1 * 2 Y* 3
-
- Property svn:ignore
-
trunk/src/Yworkdir/Y2sinobad.h
r1 r3 24092 24092 else if (strcmp(argv[0], "true_target_in_tab") == 0) 24093 24093 true_target_in_tab(argc, argv); 24094 else if (strcmp(argv[0], "xrst_save") == 0) 24095 xrst_save(argc, argv); 24094 24096 else codret=0; 24095 24097 return(codret); -
trunk/src/sinobad.d
r1 r3 788 788 insert_fct arg xistate_init 789 789 insert_fct arg true_target_in_tab 790 insert_fct arg xrst_save 790 791 #insert_fct arg load_shape_func 791 792 #insert_fct arg load_stdev_pca -
trunk/src/sinobad.h
r1 r3 81 81 void xsolmat_init(); 82 82 void xistate_init(int argc, char *argv[]); 83 void xrst_save(int argc, char *argv[]); 83 84 84 85 ////////////////////////////////////////////////////////////// … … 458 459 }*/ 459 460 } 460 461 461 //_____________________________________________________________________________ 462 462 void xtraqsr_init(){// init of solar radiation penetration … … 832 832 833 833 834 834 void xrst_save(int argc, char *argv[]) { 835 if (argc!=2) 836 { 837 printf("\ncf file for saving restart not specified in command xrst_save\n"); 838 exit(1); 839 } 840 else 841 { 842 char rest_file[200]; 843 int rest_file_id; 844 strcpy(rest_file,argv[1]); 845 rest_file_id=Ouvre_nc_write(rest_file); 846 write_rst_global_att(rest_file_id); 847 nc_close( rest_file_id); 848 } 849 }
Note: See TracChangeset
for help on using the changeset viewer.