--- trunk/libf/phylmd/phyredem.f90	2011/04/08 12:43:31	43
+++ trunk/libf/phylmd/phyredem.f90	2011/12/06 15:07:04	54
@@ -128,8 +128,6 @@
     call nf95_enddef(nid)
     call nf95_put_var(nid, nvarid, pctsrf(:, is_sic))
 
-
-
     DO nsrf = 1, nbsrf
        IF (nsrf<=99) THEN
           WRITE (str2, '(i2.2)') nsrf
@@ -245,7 +243,6 @@
        call nf95_put_var(nid, nvarid, evap(:, nsrf))
     END DO
 
-
     DO nsrf = 1, nbsrf
        IF (nsrf<=99) THEN
           WRITE (str2, '(i2.2)') nsrf
@@ -261,7 +258,6 @@
        call nf95_put_var(nid, nvarid, snow(:, nsrf))
     END DO
 
-
     call nf95_redef(nid)
     call nf95_def_var(nid, 'RADS', nf90_float, idim2, nvarid)
     call nf95_put_att(nid, nvarid, 'title', &
@@ -404,7 +400,6 @@
     call nf95_enddef(nid)
     call nf95_put_var(nid, nvarid, run_off_lic_0)
 
-
     call nf95_close(nid)
 
   END SUBROUTINE phyredem