Changeset 6237 for branches/UKMO/nemo_v3_6_STABLE_copy/NEMOGCM/EXTERNAL/AGRIF/LIB/WorkWithglobliste.c
- Timestamp:
- 2016-01-13T15:47:26+01:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/UKMO/nemo_v3_6_STABLE_copy/NEMOGCM/EXTERNAL/AGRIF/LIB/WorkWithglobliste.c
r5781 r6237 46 46 void Add_Globliste_1(listvar *listtoadd) 47 47 { 48 if ( firstpass == 1 ) 49 { 50 if ( aftercontainsdeclare == 0 && 51 VariableIsParameter == 0 ) 52 { 53 List_Global_Var = AddListvarToListvar(listtoadd,List_Global_Var,1); 54 } 55 } 48 if ( aftercontainsdeclare == 0 && VariableIsParameter == 0 ) 49 { 50 List_Global_Var = AddListvarToListvar(listtoadd, List_Global_Var, 1); 51 } 56 52 } 57 53 … … 100 96 { 101 97 strcpy(oldvar->v_dimension->dim.last,newvar->v_dimension->dim.last); 102 strcpy(oldvar->v_dimension->dim.first,newvar->v_dimension->dim.first); 98 strcpy(oldvar->v_dimension->dim.first,newvar->v_dimension->dim.first); 103 99 } 104 100 out = 1;
Note: See TracChangeset
for help on using the changeset viewer.