mld2p4-dev/mlprec

Makefile
 mld_dprecset.f90
 mld_zprecset.f90

Fixed dependency in Makefile was rebuilding the module files with
MPIF90 when not needed.
Fixed overlapping labels in precsetc.
stopcriterion
Salvatore Filippone 17 years ago
parent 5bd0cd33ad
commit f928f78683

@ -48,7 +48,7 @@ mld_prec_mod.o mld_innner_mod.o: mld_prec_type.o
$(MODOBJS): $(PSBLIBDIR)/psb_base_mod$(.mod) $(MODOBJS): $(PSBLIBDIR)/psb_base_mod$(.mod)
mpobjs: mpobjs: $(MODOBJS)
(make $(MPFOBJS) F90="$(MPF90)" F90COPT="$(F90COPT)") (make $(MPFOBJS) F90="$(MPF90)" F90COPT="$(F90COPT)")
(make $(MPCOBJS) CC="$(MPCC)" CCOPT="$(CCOPT)") (make $(MPCOBJS) CC="$(MPCC)" CCOPT="$(CCOPT)")

@ -463,14 +463,14 @@ contains
val = mld_mult_ml_ val = mld_mult_ml_
case('DEC') case('DEC')
val = mld_dec_aggr_ val = mld_dec_aggr_
case('REPL')
val = mld_repl_mat_
case('DIST')
val = mld_distr_mat_
case('SYMDEC') case('SYMDEC')
val = mld_sym_dec_aggr_ val = mld_sym_dec_aggr_
case('GLB') case('GLB')
val = mld_glb_aggr_ val = mld_glb_aggr_
case('REPL')
val = mld_repl_mat_
case('DIST')
val = mld_distr_mat_
case('SMOOTH') case('SMOOTH')
val = mld_smooth_prol_ val = mld_smooth_prol_
case('PRE') case('PRE')
@ -479,6 +479,14 @@ contains
val = mld_post_smooth_ val = mld_post_smooth_
case('TWOSIDE','BOTH') case('TWOSIDE','BOTH')
val = mld_twoside_smooth_ val = mld_twoside_smooth_
case('NOPREC')
val = mld_noprec_
case('DIAG')
val = mld_diag_
case('BJAC')
val = mld_bjac_
case('AS')
val = mld_as_
case default case default
val = -1 val = -1
info = -1 info = -1

@ -463,14 +463,14 @@ contains
val = mld_mult_ml_ val = mld_mult_ml_
case('DEC') case('DEC')
val = mld_dec_aggr_ val = mld_dec_aggr_
case('REPL')
val = mld_repl_mat_
case('DIST')
val = mld_distr_mat_
case('SYMDEC') case('SYMDEC')
val = mld_sym_dec_aggr_ val = mld_sym_dec_aggr_
case('GLB') case('GLB')
val = mld_glb_aggr_ val = mld_glb_aggr_
case('REPL')
val = mld_repl_mat_
case('DIST')
val = mld_distr_mat_
case('SMOOTH') case('SMOOTH')
val = mld_smooth_prol_ val = mld_smooth_prol_
case('PRE') case('PRE')
@ -479,6 +479,14 @@ contains
val = mld_post_smooth_ val = mld_post_smooth_
case('TWOSIDE','BOTH') case('TWOSIDE','BOTH')
val = mld_twoside_smooth_ val = mld_twoside_smooth_
case('NOPREC')
val = mld_noprec_
case('DIAG')
val = mld_diag_
case('BJAC')
val = mld_bjac_
case('AS')
val = mld_as_
case default case default
val = -1 val = -1
info = -1 info = -1

Loading…
Cancel
Save