help! easy problem! on using DISP subroutine to define a temperature boundary condition

[xhjack]

I am completely new in the subroutine process.

I am trying to use the DISP subroutine for applying a thermal boundary conditions to study thermal strain.

for start,i tried to define a uniform temperature boundry condition with subroutine.

It can be done without any subroutine but it is a start.

i defined a User-defined boudary condition then wrote the subroutine as follows.

SUBROUTINE DISP(U,KSTEP,KINC,TIME,NODE,NOEL,JDOF,COORDS)
C
INCLUDE 'ABA_PARAM.INC'
C
DIMENSION U(3),TIME(2),COORDS(3)
C
U(1) = 50
RETURN
END

i named the subroutine as KDISP.f and attached it at job

but when i submitted the job, it aborted with the error as follow

Problem during compilation - /utmp/meursault/fzhang/abaqus/KDISP.f

checking the .log file, it gave

Abaqus JOB transverse2
Abaqus 6.10-2
Begin Compiling Abaqus/Standard User Subroutines
Tue Jun 12 14:33:00 2012
Unknown option: P2OPT_hpo_vec_divbyzero
compilation aborted for KDISP.f (code 1)
Abaqus Error: Problem during compilation - /utmp/meursault/fzhang/abaqus/temperature_diffusion/KDISP.f
Abaqus/Analysis exited with errors

i wonder what is the problem, can anyone help me please?

 

[portliner]

Think you should use sub. UTEMP for applying temperatures, not sure if this routine is to be used in thermal or mechanical analysis