<p><b>duda</b> 2012-04-10 18:45:38 -0600 (Tue, 10 Apr 2012)</p><p>Add the 'save' attribute to input and output objects to avoid the following error from the xlf compiler:<br>
<br>
&quot;A variable declared in the scope of a module, output_obj, that is of a derived type with default initialization, must have the SAVE attribute.&quot;<br>
<br>
<br>
M    src/core_hyd_atmos/mpas_atmh_mpas_core.F<br>
M    src/core_sw/mpas_sw_mpas_core.F<br>
M    src/driver/mpas_subdriver.F<br>
M    src/core_nhyd_atmos/mpas_atm_mpas_core.F<br>
M    src/core_ocean/mpas_ocn_mpas_core.F<br>
</p><hr noshade><pre><font color="gray">Modified: branches/omp_blocks/io/src/core_hyd_atmos/mpas_atmh_mpas_core.F
===================================================================
--- branches/omp_blocks/io/src/core_hyd_atmos/mpas_atmh_mpas_core.F        2012-04-10 23:08:42 UTC (rev 1768)
+++ branches/omp_blocks/io/src/core_hyd_atmos/mpas_atmh_mpas_core.F        2012-04-11 00:45:38 UTC (rev 1769)
@@ -3,7 +3,7 @@
    use mpas_framework
    use mpas_timekeeping
 
-   type (io_output_object) :: restart_obj
+   type (io_output_object), save :: restart_obj
 
    integer :: current_outfile_frames
 

Modified: branches/omp_blocks/io/src/core_nhyd_atmos/mpas_atm_mpas_core.F
===================================================================
--- branches/omp_blocks/io/src/core_nhyd_atmos/mpas_atm_mpas_core.F        2012-04-10 23:08:42 UTC (rev 1768)
+++ branches/omp_blocks/io/src/core_nhyd_atmos/mpas_atm_mpas_core.F        2012-04-11 00:45:38 UTC (rev 1769)
@@ -2,8 +2,8 @@
 
    use mpas_framework
 
-   type (io_output_object) :: restart_obj
-   type (io_input_object) :: sfc_update_obj
+   type (io_output_object), save :: restart_obj
+   type (io_input_object), save :: sfc_update_obj
    integer :: current_outfile_frames
    
    type (MPAS_Clock_type) :: clock

Modified: branches/omp_blocks/io/src/core_ocean/mpas_ocn_mpas_core.F
===================================================================
--- branches/omp_blocks/io/src/core_ocean/mpas_ocn_mpas_core.F        2012-04-10 23:08:42 UTC (rev 1768)
+++ branches/omp_blocks/io/src/core_ocean/mpas_ocn_mpas_core.F        2012-04-11 00:45:38 UTC (rev 1769)
@@ -27,7 +27,7 @@
 
    use ocn_time_average
 
-   type (io_output_object) :: restart_obj
+   type (io_output_object), save :: restart_obj
 
    integer :: current_outfile_frames
 

Modified: branches/omp_blocks/io/src/core_sw/mpas_sw_mpas_core.F
===================================================================
--- branches/omp_blocks/io/src/core_sw/mpas_sw_mpas_core.F        2012-04-10 23:08:42 UTC (rev 1768)
+++ branches/omp_blocks/io/src/core_sw/mpas_sw_mpas_core.F        2012-04-11 00:45:38 UTC (rev 1769)
@@ -3,7 +3,7 @@
    use mpas_framework
    use mpas_timekeeping
 
-   type (io_output_object) :: restart_obj
+   type (io_output_object), save :: restart_obj
    integer :: current_outfile_frames
 
    type (MPAS_Clock_type) :: clock

Modified: branches/omp_blocks/io/src/driver/mpas_subdriver.F
===================================================================
--- branches/omp_blocks/io/src/driver/mpas_subdriver.F        2012-04-10 23:08:42 UTC (rev 1768)
+++ branches/omp_blocks/io/src/driver/mpas_subdriver.F        2012-04-11 00:45:38 UTC (rev 1769)
@@ -5,7 +5,7 @@
 
    type (dm_info), pointer :: dminfo
    type (domain_type), pointer :: domain
-   type (io_output_object) :: output_obj
+   type (io_output_object), save :: output_obj
    integer :: output_frame
 
 

</font>
</pre>