_RL vstressstartdate
& vstressperiod, vstressstartdate,
IF ( ustressstartdate .NE. vstressstartdate .OR.
I vstressfile, vstressstartdate, vstressperiod,
O vstressstartdate,
& .AND. ustressstartdate .EQ. vstressstartdate
vstressstartdate = 0.
& vstressstartdate