model status initialization for the single level primtive equation model without terrain the model reads in the input u,v field from unit 21 and outputs the u,v,z fields to unit 22 note : the grid size and/or the southernmost latitude need to be changed in subroutine "const" if the domain/or data is changed printing first and last value of each field u(1,1)= -.7138E+01 u(l,m)= .9323E+01 v(1,1)= -.4480E+01 v(l,m)= -.1548E+01 progress of relaxation ntps nrel nsc ia 1590 1099 1000 1000 progress of relaxation ntps nrel nsc ia 1710 1710 67 1000 u(1,1)= -.7087E+01 u(l,m)= .9255E+01 v(1,1)= -.4447E+01 v(l,m)= -.1559E+01 z(1,1)= .3166E+04 z(l,m)= .3206E+04 Stop - Program terminated.