180 |
|
|
181 |
! CALL WRITE_FULLARRAY_RL ("umask",STREAMICE_umask, |
! CALL WRITE_FULLARRAY_RL ("umask",STREAMICE_umask, |
182 |
! c 1,0,0,1,0,myThid) |
! c 1,0,0,1,0,myThid) |
183 |
CALL WRITE_FLD_XY_RL ("umask","",STREAMICE_umask,0,myThid) |
! CALL WRITE_FLD_XY_RL ("umask","",STREAMICE_umask,0,myThid) |
184 |
CALL WRITE_FLD_XY_RL ("vmask","",STREAMICE_vmask,0,myThid) |
! CALL WRITE_FLD_XY_RL ("vmask","",STREAMICE_vmask,0,myThid) |
185 |
CALL WRITE_FLD_XY_RL ("ufacemask","",STREAMICE_ufacemask,0,myThid) |
! CALL WRITE_FLD_XY_RL ("ufacemask","",STREAMICE_ufacemask,0,myThid) |
186 |
CALL WRITE_FLD_XY_RL ("vfacemask","",STREAMICE_vfacemask,0,myThid) |
! CALL WRITE_FLD_XY_RL ("vfacemask","",STREAMICE_vfacemask,0,myThid) |
187 |
|
|
188 |
#ifdef ALLOW_PETSC |
#ifdef ALLOW_PETSC |
189 |
|
|