『求助』向各位高手请教几个问题？

1、本人在调用marc2005 example 中的S3.C3.27例进行运算时，系统提示：the compilation of a user bubroutine failed,the log file contains information about the failure.但程序文件是marc2005自带的，本人未做任何更改。不明白未何出错。子程序内容如下：
subroutine ugrowrigid(md,relx,rely,relz,time)
implicit real*8 (a-h,o-z)
c
c user subroutine for definition of relative size of rigid's
c
c md : rigid body number
c relx : relative size in x-direction with respect to originial
c rely : relative size in y-direction with respect to originial
c relz : relative size in z-direction with respect to originial
c time : time
c
c relx,rely and relz shoul be defined by the user
c
relx=1.0d0
rely=1.0d0
relz=1.0d0
if(md.eq.3) then
if(time.le.1.0d0) then
rely=1.0d0 + 1.6d0*time
else
rely=2.6d0
end if
relz=rely
write(6,*) 'md,relx,rely,relz=',md,relx,rely,relz
end if
return
end
2、我在参照陈火红编写的《msc.marc/ment2003》做第11章开关记忆合金中，操作内容完全参照书上操作。但在提交运算时程序出现44个warnings:inset insert1:no host elements found!the insert will be ignored!

还请各位高手出手相助小弟。先在此谢过。