Dear Abhinay,
You’re on the right track, but I think you’ll need to study more about FORTRAN coding, and figure out more about the MoorDyn code, before you’ll be able to succeed.
Here are a couple tips:
- To set a value to zero, you can use “=0.0_ReKi”, for example: m%ConnectList(m%FairIdList(I))%r(J) = 0.0_ReKi,
- The values your code would set to zero are the fairlead displacements, but I think what you want to do is set the fairlead forces to zero.
There is a bit of discussion about the idea of simulating failures in MoorDyn in this thread, in case it’s helpful to you: Making fault
Best,
Matt