Lines Matching refs:l_work
21 integer l_work,k_work ! Work space local
65 1 l_work,k_work)) call errquit('tce_mod1: MA problem',0,
83 if (.not.ma_pop_stack(l_work))
123 integer l_work,k_work ! Work space local
167 1 l_work,k_work)) call errquit('tce_moq1: MA problem',0,
185 if (.not.ma_pop_stack(l_work))
226 integer l_work,k_work ! Work space local
270 1 l_work,k_work)) call errquit('tce_moo1: MA problem',0,
288 if (.not.ma_pop_stack(l_work))
329 integer l_work,k_work ! Work space local
385 1 l_work,k_work)) call errquit('tce_mom1: MA problem',0,
403 if (.not.ma_pop_stack(l_work))