print *,'hello' include 'ercs07:fbugs.ftests_f045a' print *,'back to main file' j=4 print *,'now call nested includes' include 'ercs07:fbugs.ftests_f045b' print *,'back to main file again' if(j.ne.i) print *,'help - something is wrong !' print *,'test f045 complete' stop end