Notifications
Clear all

writing in a .dat file with Abaqus Subroutines

2 Posts
2 Users
0 Likes
743 Views
blinker0001
Posts: 8
Topic starter
(@blinker0001)
Active Member
Joined: 12 years ago

I am able to write data in a file using:

open(105,file=G:\Program files\Abaqus 11\Temp\subroutine test\isotropic isothermal elasticity\result.dat,position=append,recl=100)

write(105,*) test

close(105)

But everytime I want to rerun my job, i should first delete the content of result.dat and then rerun otherwise the results of the upcoming run would be appended to the existing ones. I added status = replace to the open statement, but abaqus gives an error. Anyidea what I should do?

Thanks

Topic Tags
1 Reply
dallaslawyer
Posts: 6
(@dallaslawyer)
Active Member
Joined: 8 years ago

I do not include the position statement, that works great, but every run of the routine deletes older output:

open (100, file=....output.txt, status=old)

you could also try something like

logical :: firstcall = .true.

save firstcall

if (firstcall) then

...delete your file, or create a new one etc.

append output to new file

endif

Topic Tags
1 Reply
Share: