Lines Matching refs:err

11       integer ceed,err
28       call ceedinit(trim(arg)//char(0),ceed,err)
32      &//'t400-qfunction.h:setup'//char(0),qf_setup,err)
33       call ceedqfunctionaddinput(qf_setup,'w', 1,ceed_eval_weight,err)
34       call ceedqfunctionaddoutput(qf_setup,'qdata',1,ceed_eval_none,err)
38      &//'t400-qfunction.h:mass'//char(0),qf_mass,err)
39       call ceedqfunctionaddinput(qf_mass,'qdata',1,ceed_eval_none,err)
40       call ceedqfunctionaddinput(qf_mass,'u',1,ceed_eval_interp,err)
41       call ceedqfunctionaddoutput(qf_mass,'v',1,ceed_eval_interp,err)
43       call ceedqfunctionview(qf_setup,err)
44       call ceedqfunctionview(qf_mass,err)
46       call ceedqfunctioncontextcreate(ceed,ctx,err)
49      & ctxdata,coffset,err)
50       call ceedqfunctioncontextview(ctx,err)
52       call ceedqfunctionsetnumviewtabs(qf_mass,1,err)
53       call ceedqfunctionview(qf_mass,err)
54       call ceedqfunctioncontextsetnumviewtabs(ctx,1,err)
55       call ceedqfunctioncontextview(ctx,err)
57       call ceedqfunctiondestroy(qf_setup,err)
58       call ceedqfunctiondestroy(qf_mass,err)
59       call ceeddestroy(ceed,err)