Changes to internal docs for NaturalDocs processing.

mlprec/mld_daggrmap_bld.f90

@@ -71,6 +71,7 @@
 !                  adjacency graph of the coarse-level matrix.
 !    info       -  integer, output.
 !                  Error code.
+!
 subroutine mld_daggrmap_bld(aggr_type,a,desc_a,nlaggr,ilaggr,info)
 
   use psb_base_mod
@@ -102,7 +103,7 @@ subroutine mld_daggrmap_bld(aggr_type,a,desc_a,nlaggr,ilaggr,info)
   name = 'mld_aggrmap_bld'
   call psb_erractionsave(err_act)
   !
-  ! For the time being we are ignoring aggr_type so
+  ! Note. At the time being we are ignoring aggr_type so
   ! that we only have decoupled aggregation. This might 
   ! change in the future. 
   !
@@ -148,6 +149,7 @@ subroutine mld_daggrmap_bld(aggr_type,a,desc_a,nlaggr,ilaggr,info)
     !    -(nr+1)  Untouched as yet
     !       -i    1<=i<=nr  Adjacent to aggregate i
     !        i    1<=i<=nr  Belonging to aggregate i
+
     !
     ! Phase one: group nodes together. 
     ! Very simple minded strategy. 

mlprec/mld_dbaseprec_aply.f90

@@ -56,7 +56,7 @@
 ! Arguments:
 !   alpha      -  real(kind(0.d0)), input.
 !                 The scalar alpha.
-!   prec       -  type(<mld_dbaseprc_type>), input.
+!   prec       -  type(mld_dbaseprc_type), input.
 !                 The base preconditioner data structure containing the local part
 !                 of the preconditioner K.
 !   x          -  real(kind(0.d0)), dimension(:), input.
@@ -189,7 +189,7 @@ subroutine mld_dbaseprec_aply(alpha,prec,x,beta,y,desc_data,trans,work,info)
     else
 
       !
-      ! Currently trans is unused
+      ! Note: currently trans is unused
       !
 
       n_row  = psb_cd_get_local_rows(prec%desc_data)