Changeset 35
- Timestamp:
- 04/23/09 16:57:31 (16 years ago)
- Location:
- XMLIO_SERVER/trunk/src/XMLIO
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
XMLIO_SERVER/trunk/src/XMLIO/mod_context.f90
r29 r35 31 31 TYPE(vector_field_group),POINTER :: field_group__field_group_ids 32 32 TYPE(sorted_list),POINTER :: field_group__Ids 33 TYPE(field_group),POINTER :: field_definition__field_def inition33 TYPE(field_group),POINTER :: field_definition__field_def 34 34 TYPE(vector_file),POINTER :: file__file_Ids 35 35 TYPE(sorted_list),POINTER :: file__Ids 36 36 TYPE(vector_file_group),POINTER :: file_group__file_group_Ids 37 37 TYPE(sorted_list),POINTER :: file_group__Ids 38 TYPE(file_group),POINTER :: file_definition__file_def inition38 TYPE(file_group),POINTER :: file_definition__file_def 39 39 TYPE(vector_grid),POINTER :: grid__grid_Ids 40 40 TYPE(sorted_list),POINTER :: grid__Ids … … 43 43 TYPE(vector_grid_group),POINTER :: grid_group__grid_group_Ids 44 44 TYPE(sorted_list),POINTER :: grid_group__Ids 45 TYPE(grid_group),POINTER :: grid_definition__grid_def inition45 TYPE(grid_group),POINTER :: grid_definition__grid_def 46 46 TYPE(vector_axis),POINTER :: axis__axis_Ids 47 47 TYPE(sorted_list),POINTER :: axis__Ids 48 48 TYPE(vector_axis_group),POINTER :: axis_group__axis_group_Ids 49 49 TYPE(sorted_list),POINTER :: axis_group__Ids 50 TYPE(axis_group),POINTER :: axis_definition__axis_def inition50 TYPE(axis_group),POINTER :: axis_definition__axis_def 51 51 TYPE(vector_file_dep),POINTER :: dependency__file_enabled 52 52 TYPE(vector_field_out),POINTER :: dependency__field_enabled … … 120 120 ALLOCATE(pt_context%field_group__field_group_ids ) 121 121 ALLOCATE(pt_context%field_group__Ids ) 122 ALLOCATE(pt_context%field_definition__field_def inition)122 ALLOCATE(pt_context%field_definition__field_def ) 123 123 ALLOCATE(pt_context%file__file_Ids) 124 124 ALLOCATE(pt_context%file__Ids) 125 125 ALLOCATE(pt_context%file_group__file_group_Ids) 126 126 ALLOCATE(pt_context%file_group__Ids) 127 ALLOCATE(pt_context%file_definition__file_def inition)127 ALLOCATE(pt_context%file_definition__file_def) 128 128 ALLOCATE(pt_context%grid__grid_Ids) 129 129 ALLOCATE(pt_context%grid__Ids) … … 132 132 ALLOCATE(pt_context%grid_group__grid_group_Ids) 133 133 ALLOCATE(pt_context%grid_group__Ids) 134 ALLOCATE(pt_context%grid_definition__grid_def inition)134 ALLOCATE(pt_context%grid_definition__grid_def) 135 135 ALLOCATE(pt_context%axis__axis_Ids) 136 136 ALLOCATE(pt_context%axis__Ids) 137 137 ALLOCATE(pt_context%axis_group__axis_group_Ids) 138 138 ALLOCATE(pt_context%axis_group__Ids) 139 ALLOCATE(pt_context%axis_definition__axis_def inition)139 ALLOCATE(pt_context%axis_definition__axis_def) 140 140 ALLOCATE(pt_context%dependency__file_enabled) 141 141 ALLOCATE(pt_context%dependency__field_enabled) … … 212 212 CALL field__swap_context(Pt_context%field__field_Ids ,Pt_context%field__Ids) 213 213 CALL field_group__swap_context(Pt_context%field_group__field_group_ids ,Pt_context%field_group__Ids) 214 CALL field_definition__swap_context(Pt_context%field_definition__field_def inition)214 CALL field_definition__swap_context(Pt_context%field_definition__field_def) 215 215 CALL file__swap_context(Pt_context%file__file_Ids,Pt_context%file__Ids) 216 216 CALL file_group__swap_context(Pt_context%file_group__file_group_Ids,Pt_context%file_group__Ids) 217 CALL file_definition__swap_context(Pt_context%file_definition__file_def inition)217 CALL file_definition__swap_context(Pt_context%file_definition__file_def) 218 218 CALL grid__swap_context(pt_context%grid__grid_Ids,pt_context%grid__Ids) 219 219 CALL zoom__swap_context(pt_context%zoom__zoom_Ids,pt_context%zoom__Ids) 220 220 CALL grid_group__swap_context(pt_context%grid_group__grid_group_Ids,pt_context%grid_group__Ids) 221 CALL grid_definition__swap_context(pt_context%grid_definition__grid_def inition)221 CALL grid_definition__swap_context(pt_context%grid_definition__grid_def) 222 222 CALL axis__swap_context(pt_context%axis__axis_Ids,pt_context%axis__Ids) 223 223 CALL axis_group__swap_context(pt_context%axis_group__axis_group_Ids,pt_context%axis_group__Ids) 224 CALL axis_definition__swap_context(pt_context%axis_definition__axis_def inition)224 CALL axis_definition__swap_context(pt_context%axis_definition__axis_def) 225 225 CALL dependency__swap_context(pt_context%dependency__file_enabled,pt_context%dependency__field_enabled, & 226 226 pt_context%dependency__field_id,pt_context%dependency__sorted_id) -
XMLIO_SERVER/trunk/src/XMLIO/mod_field.f90
r29 r35 133 133 134 134 135 SUBROUTINE field__set(p_field, name, ref, description, unit, operation, freq_op, axis_ref, grid_ref, zoom_ref, prec, level, enabled) 135 SUBROUTINE field__set(p_field, name, ref, description, unit, operation, freq_op, axis_ref, grid_ref, zoom_ref, prec, level, & 136 enabled) 136 137 137 138 TYPE(field), pointer :: p_field
Note: See TracChangeset
for help on using the changeset viewer.