fortran - gfortran Error: Nonnegative width required in format string at (1) -

सवाल में कोड यह है:

  उप-विधि PG_TLab_Write (c30, r, d) निहित कोई पात्र नहीं * 30 सी 30, बाकी सही * 4 आर पूर्णांक * 4 डी, कश्मीर अगर (डी.ई.फ़ .0) तो लिखो (सी 30, '(i30)') निंट (आर) अन्यथा (डीजीटी .0) तो लिखना (सी 30, '(एफ 30. & lt; d & gt;)') आर else k = abs (d) लिखना (सी 30, '(1 पी 30. & lt; k & gt;') आर एंडआईफ़ सी 30 = लेफ्टएज (सी 30) अगर (डीएलटी .0) तब कश्मीर = इंडेक्स (सी 30, 'ई') सी 30 = सी 30 (1: के -1) // 'x10 \\ u' // c30 (कश्मीर + 1: 24) एंडिफ़ रिटर्न एंड  < / Pre> 
 यह वास्तव में पुरानी (खराब) कोड है, और मैं एक फॉरेन प्रोग्रामर नहीं हूं। यह त्रुटि निम्न है:  
  त्रुटि: प्रारूप स्ट्रिंग में अनुपलब्ध चौड़ाई (1) पीजी-यूपी। एफ: 561.26:   
 सेगमेंट में पिछले 2 लिखने वाले वक्तव्यों पर त्रुटियां आती हैं।  
 मेरा प्रश्न है कि मैं कैसे और कश्मीर अहस्ताक्षरित पूर्णांक तो यह संकलित करेगा?   
 
 
 आप फोरट्रान के बाद से डी और कश्मीर के हस्ताक्षर नहीं कर सकते अहस्ताक्षरित पूर्णांक नहीं है।  
 मेरा अनुमान है, उस लिन को मानते हुए त्रुटि संदेश में ई 561, जो आपने पोस्ट की गई स्निपेट में अगले-से-अंतिम पंक्ति को दर्शाता है, यह समस्या चर प्रारूप अभिव्यक्ति (& lt; k & gt; चीज़)। वेरिएबल प्रारूप अभिव्यक्ति मानक के लिए एक एक्सटेंशन है जो कि गफ़्रारन द्वारा समर्थित नहीं है। एक मानक अनुरूप तरीके से समतुल्य बात कैसे करें उदाहरण के लिए देखें।